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Vorwort 


Das vorliegende Wegweiser-Buch weist Wege zum erfolgreichen Einsatz des 
Commodore 116, Commodore 16 und Commodore plus/4. 


Das Wegweiser-Buch vermittelt aktuelles Grundlagenwissen zur Datenver- 
arbeitung bzw. Informatik: 


— Was ist Hardware, Software und Firmware? 

— Was sind Großcomputer und Mikrocomputer? 

— Was sind Datenstrukturen und Programmstrukturen? 
— Was sind Betriebssysteme und Anwenderprogramme? 
— Was heißt ‚fertige Programm-Pakete einsetzen’ ? 

— Was beinhaltet das eigene Programmieren? 


Nach der Lektüre dieses Abschnitts sind Sie in der Lage, die Commodore- 
Computer in den Gesamtrahmen der „Datenverarbeitung/Informatik’’ ein- 
zuordnen. 


Das Wegweiser-Buch gibt eine erste Bedienungsanleitung: 


— Wie bediene ich Tastatur, Bildschirm, Floppy bzw. Disketteneinheit und 
Drucker des C-116, C-16 und plus/4. 

— Wie erstelle ich mein erstes Programm in der Programmiersprache 
BASIC 3.5? 

— Welche Befehle umfaßt BASIC 3.5 (zu jedem Befehl wird ein Beispiel 
angegeben)? 

— Worin unterscheiden sich BASIC 3.5 von den anderen Sprachversionen 
BASIC 2.0 und BASIC 4.0? 

— Laufen Programme des C-116, C-16 und plus/4 auch auf anderen Mikro- 
computern von Commodore? 

Nach der Lektüre dieses Abschnitts können Sie ihren C-116, C-16 und plus/4 

bedienen, Programme laufen lassen und einfache BASIC-Programme selbst 

erstellen und speichern. 


Das Wegweiser-Buch enthält einen kompletten Programmierkurs mit folgen- 
den grundlegenden BASIC-Anwendungen: 


— Programme mit den wichtigen Ablaufstrukturen (Folge-, Auswahl-, 
Wiederholungs- und Unterprogrammstrukturen). 

— Verarbeitung von Text, Ein-/Ausgabe und Tabellen. 

— Maschinennahe Programmierung (... Bit für Bit). 

— Suchen, Sortieren, Mischen und Gruppieren von Daten. 

— Sequentielle Datei und Direktzugriff-Datei. 

— Grafik und Musik. 


VI Vorwort 


Nach der Lektüre dieses Abschnitts können Sie die Sprachmöglichkeiten von 
BASIC 3.5 auf dem Commodore 116, Commodore 16 und Commodore plus/4 
nutzen. 


Das Wegweiser-Buch soll die von Commodore gelieferten System-Handbücher 
keinesfalls ersetzen, sondern ergänzen: 

In den Handbüchern werden Programmiersprachen, das DOS-Betriebssystem, 
die Gerätebedienung, technische Eigenschaften (Hardware), spezielle Geräte 
oder Software beschrieben. 

Das Wegweiser-Buch hingegen beschreibt die Grundlagen der Datenverarbei- 
tung, um sie an zahlreichen Anwendungsmöglichkeiten für den C-116, C-16 
und plus/4 zu demonstrieren und zu veranschaulichen. 

Im Wegweiser-Buch werden für alle 87 Programm-Beispiele das BASIC- 
Listing (LIST) und die Ausführung (RUN) wiedergegeben und ausführlich 
erklärt. 

Die Abschnitte 2 und 3 des Wegweiser-Buches bauen aufeinander auf und 
sollten in dieser Abfolge gelesen werden. Abschnitt 1 hingegen kann parallel 
dazu bearbeitet werden. 


Abschnitt 2: 

Einstieg in 

die BASIC-Programmierung 
des C-116, C-16 und plus/4 


Abschnitt 1: 
Computer 
allgemein 


Abschnitt 3: 
Programmierkurs mit 
Commodore-BASIC 3.5 





Für schnelle und eilige Commodore-Besitzer: Das Wegweiser-Buch läßt sich 
auch als Nachschlagewerk benutzen. Aus diesem Grunde wurden das Inhalts- 
verzeichnis und auch das Sachwortverzeichnis sehr detailliert aufgegliedert. 


Heidelberg, September 1984 Ekkehard Kaier 
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2 1 Computer allgemein 


1.1 Computer = Hardware + Software + Firmware 


1.1.1 Überblick 


Jeder Computer besteht aus Hardware (harter Ware), aus Soft- 
ware (weicher Ware) und aus Firmware (fester Ware). Dies gilt 
für Mikro- und Personalcomputer ebenso wie für Großcomputer. 


Die Hardware umfaßt alles das, was man anfassen kann: 
Geräte einerseits und Datenträger andererseits. Das wichtigste 
Gerät ist die Zentraleinheit bzw. CPU (für Central Processing 
Unit), mit der periphere Einheiten als Randeinheiten verbunden 
sind; so z.B. eine Tastatur zur Eingabe der Daten von Hand, 
ein Drucker zur Ausgabe der Resultate schwarz auf weiß und ei- 
ne Disketteneinheit zur langfristigen Speicherung von Daten 
auf einer Diskette als Datenträger außerhalb der CPU. 


Hardware 
Geräte, Einheiten: Datenträger: 


Zentraleinheit Periphere Einheiten z.B. Diskette, Kassette, 
bzw. CPU wie Disketteneinheit, Magnetplatte, Magnet- 
Tastatur, Drucker band, Winchesterplatte 


Die Hardware als harte Ware kann man anfassen 


Die Soft wa re als zweite Komponente des Computers kann 
man im Gegensatz zur Hardware nicht anfassen. Software bedeu- 
tet soviel wie Information; sie umfaßt die Daten und auch die 
Programme als Vorschriften zur Verarbeitung dieser Daten. Ist 
die Hardware als festverdrahtete Elektronik des Computers fest 
und vom Benutzer nicht (ohne weiteres) änderbar, dann gilt für 
die Software genau das Gegenteil: Jeder Benutzer kann Programm 
wie Daten verändern, austauschen, ergänzen und auch zerstören. 





Software 
baten: Programm: 
Objekte der Geordnete Folge 
Datenverarbeitung von Anweisungen 
(wa s wird verarbeitet?) (wi e ist zu verarbeiten?) 


Die Software als weiche Ware kann man nicht anfassen 


Die Firmware als dritte Komponente des Computers kann 
man der Hardware oder der Software zuordnen. Sie ist deshalb 
wie ein 'Zwitter' halb Hardware und halb Software. So ist z.B. 
das Rechenprogramm jedes Taschenrechners in einem speziellen 
Speicher ROM (Read Only Memory als Nur-Lese-Speicher) enthal- 
ten. Der Benutzer kann dieses Programm zwar laufen lassen und 
Information entnehmen und lesen (read), nicht jedoch abändern. 
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Für den Benutzer ist es wie Hardware fest. Für den Hersteller 
des ROMs hingegen stellt es sich wie Software veränderbar dar, 
da er den Speicher ROM ja programmieren kann und muß. 

Ein anderes Beispiel: Für viele Mikrocomputer werden Module 
mit fest im ROM gespeicherten Programmen bis zu 30.000 Zeichen 
angeboten; der Anwender steckt ein Modul in den Eingabeschacht 
seines Computers und befindet sich sogleich im Programm. Er 
kann dieses Programm als Firmware zwar laufen lassen bzw. aus- 
führen, nicht aber umprogrammieren und verändern. 

Mit der Mikrotechnologie, mit dem Chip und dem IC (Integrated 
Circuit für Integrierter Schaltkreis) hat die Firmware immer 
mehr an Bedeutung gewonnen. 


Die Hardware (fest verdrahtete Elektronik), die Software (frei 
änderbare Daten und Programme) und die Firmware (hart für den 
Benutzer und weich für den Hersteller) stellen die drei 
grundlegenden Komponenten jedes Computers dar. 
Darüberhinaus gibt es weitere ....ware: so die Orgware (Or- 
ganisation von Aufbau und Ablauf), die Menware (Personen), 
die Brainware (geistige Leistungen) und die Teachware (Lehren 

und Lernen). 


1.1.2 Kosten für die Computerleistung 


Leistung bedeutet Arbeit pro Zeiteinheit. Bestand die Arbeit 
des Computers früher im Rechnen, also im Umgang mit Zahlen 
(Computer heißt wörtlich Rechner), so wird sie heute ergänzt 
durch das Verarbeiten von Text allgemein. Die Zeiten werden 
immer kürzer: so arbeiten Computer heute 200mal schneller als 
vor 25 Jahren (Nanosekundenbereich, 1-milliardstel Sekunde). 


Betrachtet man die Entwicklung der Computerkosten, so ist ein 
zunehmendes Absinken der Kosten für die Hardware gegenüber 
den Kosten für die Software festzustellen. Zwei Gründe dafür: 
Einerseits verbilligt sich die Hardware immer mehr, sei es 
durch die Massenproduktion, sei es durch Fortschritte in der 
Mikrotechnologie. Bei entsprechender Entwicklung anderer In- 
dustriezweige dürfte ein VW-Käfer nicht mehr als 50 DM kosten 
und eine Boeing 767 nicht mehr als 1500 DM. 

Andererseits verteuert sich die Software mehr und mehr,sei es 
durch die Personalkostenintensität (Gehälter für Programment- 
wicklung, -pflege u. -wartung), sei es durch das immer höhere 
Anspruchsniveau (Erfolgsrechnung heute bereits allwöchentlich 
und früher nur einmal im Jahr zum Jahresabschluß). 

Man spricht schon von einer Kostenrelation von '20% für Hard- 
ware' gegenüber '80% für Software'. 


1.1.3 Geschichtliche Entwicklung des Computers 


Erst 1941 stellte der deutsche Ingenieur Konrad Zuse erstmals 
einen richtigen Computer vor und 1952 wurde erstmals ein Com- 
puter an ein pivates Wirtschaftsunternehmen in der BRD ausge- 
liefert. In den 60er Jahren begann die Zeit der Großcomputer 
und damit der System-Familien wie IBM/360 oder Siemens 4004. 
Die 70er Jahre wurden geprägt von der Mikrotechnologie und 
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damit vom Mikrocomputer: die Hardware wurde immer kompakter, 

schneller und preiswerter. 

Zu Beginn der 80er Jahre hat man sich an den Preisverfall der 

Hardware gewöhnt. Wen wundert es noch, daß Hardware-Preise im 

Jahr um 25% - 40% sinken? Das Interesse verlagert sich mehr 

und mehr auf die Software: Die Qualität der Programme wird 

zum entscheidenden Problem der heutigen Datenverarbeitung. 

Und in den 90er Jahren ....? Längst wird nicht mehr gelächelt 

über "intelligente" Computer,die ähnlich dem menschlichen Ge- 

hirn selbständig Probleme lösen. Die "künstliche Intelligenz" 

(abgekürzt KI) ist vor allem in Japan und den USA auf dem Vor- 
marsch. Ein japanischer Anbieter hat bereits angekündigt, bis 
1992 das erste marktreife Produkt herauszubringen. 


1.2 Hardware = Geräte + Datenträger 


1.2.1 Hardware im Überblick 
1.2.1.1 Fünf Arten peripherer Geräte bzw. Einheiten 


Um die Zentraleinheit bzw. CPU herum können bis zu fünf ver- 
verschiedene periphere Einheiten gruppiert sein: 





DIALOGGERÄTE: 
Datensichtgerät, 
Terminal 
EINGABEGERÄTE: AUSGABEGERÄTE: 
Tastatur, | Bildschirm, 
Lochkartenleser, m er Drucker, 
Belegleser Lochkartenstanzer, 
A COM 
) 
| EXTERNE SPEICHER: 
| Magnetplatteneinheit, 
Disketteneinheit, 
| Magnetbandeinheit, 
| Kassetteneinheit, 
OFF-LINE-ERFASSUNGSGERÄTE: 
Plattenschreiber, 
Bandschreiber, 
Klarschriftdrucker, on-line —— 
Lochkartenlocher off-line —— > 
Eine Einheit im Zentrum (= CPU) und mehrere periphere 


Einheiten um diese CPU herum (= Peripherie) 
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Die reinen Eingabegerät e dienen ausschließlich 
der Eingabe von Information (Daten wie Programme) in die CPU. 
Zu unterscheiden ist dabei die Direkteingabe von Hand (Tasta- 
tur) oder die Eingabe über einen Datenträger (z.B. über Scheck 
mittels Klarschriftbelegleser). 

Die reinen Ausgabege rät e geben Information von 
der CPU aus z.B. auf den Bildschirm, auf das Endlospapier vom 
Drucker, auf Mikrofilm (COM für Computer Output on Microfilm). 
film) oder auf Lochkarte. 

Die Dialoggeräte übernehmen zwei Aufgaben: die 
Eingabe (in die CPU hinein) wie auch die Ausgabe (aus der CPU 
heraus). Das Bildschirmgerät bzw. Datensichtgerät besteht nur 
aus Tastatur und Bildschirm, es ist das einfachste Terminal. 
Terminal heißt soviel wie Datenendstation, Endpunkt des Benut- 
zers zum Computer oder "Benutzerschnittstelle" und bezeichnet 
das Zugangsmedium des Benutzers zur CPU. Der Zugang kann dabei 
die Eingabe, die Ausgabe oder beides umfassen; er kann mecha- 
nisch, visuell, manuell und akustisch erfolgen. Ein Terminal 
umfaßt danach eine oder mehrere periphere Einheiten mit unter- 
schiedlichen Datenträgern. 

Die Externen Spe i che r übernehmen zusätzlich 
zur Ein- und Ausgabe von Information auch deren Speicherung. 
während der Hauptspeicher als interner Speicher der CPU Infor- 
mation nur kurzfristig zur Verarbeitungszeit aufnimmt, so die- 
nen die externen Speicher der langfristigen Aufbewahrung von 
Daten und Programmen sowie der Datensicherung (Back-Up). 


Eingabegeräte, Ausgabegeräte, Dialoggeräte u. Externe Speicher 
zählen zur On - line - Peripherie, weil die 
Verbindung zur CPU on-line ist, d.h. eine direkte Kabelverbin- 
dung die Übertragung von Information ermöglicht. Im Gegensatz 
dazu tritt bei der Off-line-Peripherie an die Stelle der Über- 
tragung der Transport von Daten (samt Datenträgern), da keine 
direkte Verbindung zwischen dem peripheren Gerät und der CPU 
besteht. 


Datenerfassung heißt, Information computerlesbar 
machen. Bei Off-line-Erfassungsgeräten besteht zum Zeitpunkt 
der Datenerfassung keine direkte Verbindung zur CPU: die Daten 
werden auf einem im Erfassungsgerät mitlaufenden Datenträger 
gespeichert. Geschieht die Erfassung hingegen on-line, dann 
ist die Erfassung gleichbedeutend mit der Eingabe. 


1.2.1.2 Drei Gruppen von Datenträgern 


Nach den Geräten der Hardware (CPU, Peripherie) kommen wir nun 
zuden Datenträgern; diese müßten eigentlich In- 
formationsträger heißen, da sie nicht nur Daten speichern bzw. 
tragen, sondern auch Programme. 

Man unterscheidet gelochte, magnetische und optische Datenträ- 
ger - je nachdem, ob die Information durch Lochungen, magneti- 
sierte Punkte oder Lichtmarkierungen (hell/dunkel, Laser) dar- 
gestellt wird. 
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Datenträger 


gelochte magnetische optische 
Datenträger: Datenträger: Datenträger: 
Lochkarte, Magnetplatte, Markierungsbeleg, 
Lochstreifen Plattenstapel, Klarschriftbeleg, 
Diskette, Magnetschriftbeleg, 
Magnetband, Balkencode-Beleg, 
Kassette, 
Magnetblasen- Optische Platte 
speicher 


Datenträger zur Aufbewahrung von Daten und Programmen 


Die Lochkarte und der vom Fernschreiber übernommene Lochstrei- 
fen werden zunehmend durch magnetische Datenträger ersetzt. 


Die Magnetplatte als Wechselplat te (in Platten- 
einheit auswechselbar) hat meistens 37 cm Durchmesser. Beim 
Magnetplattenstapel sind z.B. 6 solcher Einzelplatten zu einem 
Stapel fest übereinander montiert mit einer Speicherkapazität 
bis 300.000.000 Zeichen (=150.000 DIN A4-Seiten). Die Diskette 
bzw. Floppy Disk als verkleinerte Form der Magnetplatte wird 
als Wechselplatte zur einseitigen oder auch zweiseitigen Spei- 
cherung bei einfacher oder doppelter (2D) Aufzeichnungsdichte 
abgeboten. Derzeit sind drei Disketten-Größen verbreitet: Die 
Maxi-Diskette mit 8" = ca. 20 cm, die Mini-Diskette mit 5.25" 
= ca. 13 cm und die Mikro-Diskette mit 3.5" = ca. 9 cm Durch- 
messer. Disketten erreichen Kapazitäten von 1.000.000 Zeichen 
(=500 DIN A4-Seiten) und mehr. 


Die Winchester-Platte ist als Festplatte fest mit 
dem Gerät verbunden und somit nicht auswechselbar. Als Kunst- 
stoffplatte ist sie in den Größen 14", 8" und 5.25" im Handel. 
Aufgrund der hohen Umdrehungszahl (mehrere 1000 mal/min gegen- 
über 360 mal/min bei der Diskette) wird eine große Zugriffsge- 
schwindigkeit wie auch Kapazität erreicht: über 50.000.000 
Zeichen/Platte sind möglich (=25.000 DIN A4-Seiten). 


Das Magnetband als d e r typische Massendatenspeicher (1,27 cm 
breit und 730 m lang) kann bis ca. 35.000.000 Zeichen (=17.500 
DIN A4-Seiten) aufnehmen. In seiner verkleinerten Form als Da- 
tenkassette werden ca. 300.000 Zeichen (=150 DIN A4-Seiten) 
erreicht; erhältlich ist die Normalkassette, die 1/4-Zoll-Kas- 
sette und die 1/8-Zoll-Kassette. 


Der Magnetblasenspeicher (Bubble Memory) arbeitet ohne mecha- 
nische Teile und wird den herkömmlichen Medien (Band, Platte) 
demnächst Konkurrenz machen. 


zu den optischen Datenträgern, die der direkten Beleglesung 
dienen: Beim Markierungsbeleg (Erhebungen, TÜV, Bestellungen) 
werden Ja/Nein-Markierungen mit Bleistift ausgefüllt und vom 
Belegleser optisch eingelesen. 
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Beim Klarschriftbeleg (Scheck, Zahlkarte) wird optisches Zei- 
chen-Erkennen (OCR für Optical Character Recognition) dadurch 
erreicht, daß speziell für die DV genormte OCR-Schriften ver- 
wendet werden wie OCR-A, OCR-B und IBM-407. 

Beim Magnetschriftbeleg (Post-Briefverteilung) werden einzelne 
Zeichen mit senkrechten Balken aus magnetisierter Farbe darge- 
stellt: jeweils 7 Balken bei der CMC-7-Schrift, Dick-Dünn-Ab- 
weichungen bei der E-13-B-Schrift des US-Banksystens. 

Seit der Vereinbarung des Europa-Artikel-Nummern-Codes (EAN- 
Code) im Jahre 1977 findet sich dieser Balkencode -auch Bar- 
oder Strichcode genannt- zunehmend auf Warenpackungen. Durch 
Abtasten mit einem Lesegerät bzw. Scanner (to scan = abtasten) 
wird die Artikelnummer entschlüsselt. 


Bei der optischen Platte tritt an die Stelle des Schreib-/Le- 
sekopfs der herkömmlichen Magnetplatteneinheiten der Laser- 
lichtstrahl. Dabei sind die gespeicherten Daten nicht mehr än- 
derbar; aufgrund des niedrigen Preises wird einfach auf eine 
zweite optische Platte kopiert. Die Kapazität liegt bei über 


100.000.000 Zeichen (=50.000 DIN A4-Seiten), ist also äußerst 
hoch. 


1.2.2 Verarbeitung von Information in der CPU 
1.2.2.1 Analogie der Datenverarbeitung bei Mensch und Computer 
Die Datenverarbeitung beim Computer vollzieht sich analog zur 
Datenverarbeitung beim Menschen: die CPU als 'Gehirn des Conm- 
puters' ist analog zum menschlichen Gehirn aufgebaut. 
Mensch: eo mpu te r+# 


GEHIRN CPU 





Leitwerk 


Intelligenz Prozessor 


Be ann I>a 
Hauptspeicher 


Programm | 





Grundmodelle der Datenverarbeitung bei Mensch und Computer 


Der Eingabe (E) beim Menschen (Datenaufnahme über Auge, Ohr, 
Nase) entspricht die computerlesbare Eingabe von der Tastatur, 
Die Intelligenz des Computers wird durch einen Prozessor ver- 
körpert, der die arithmetischen und logischen Grundoperationen 
durchführt (ALU für Arithmetic Logical Unit) sowie das Gesamt- 
system steuert (Steuer- bzw. Leitwerk). 
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Neben der Intelligenz (Prozessor) als steuerndem bzw. aktivem 
Teil des Gehirns nun zum Gedächtnis (Hauptspeicher) als auf- 
nehmendem bzw. passivem Teil: den menschlichen Verhaltensab- 
läufen - sicher äußerst vage - vergleichbar sind die Computer- 
programme als Anweisungsfolgen " wi e zu verarbeiten ist" , 
während die gespeicherten Daten angeben " wa s verarbeitet 
wird". 

Die Ausgabe (A) bzw. Datenwiedergabe (z.B. durch Sprechen und 
handschriftlich) erfolgt beim Computer in computerlesbarer 
Form (z.B. Ausgabe der Lohndaten auf Diskette) und/oder men- 
schenlesbarer Form (z.B. am Bildschirm oder Drucker). 


Mensch wie Computer sind datenverarbeitende Systeme, die durch 
die 3-Schritt-Folge "Eingabe -> Verarbeitung -> Ausgabe" (kurz 
EVA-Prinzip genannt) gekennzeichnet werden können. 


Als CPU dient beim Personalcomputer bzw. Mikrocomputer ein IC 
auf einem ca. 0.5 cm langen Silicium-Chip. Ein weiterer IC ist 
für den Hauptspeicher (auch Arbeitsspeicher genannt) vorgese- 
hen. Öffnet man den Computer, dann wird man diese und weitere 
Chips sehen, die auf Kunststoffplatinen angeordnet und über 
aufgedruckte Leiterbahnen miteinander verbunden sind. 


Für Skeptiker: Die hier dargestellte Analogie der Datenverar- 
beitung bei Mensch und Computer bedeutet nicht, daß Computer 
künstliche Menschen sind, sondern daß sie ihm im Grundaufbau 
nachgebaut sind. Das einzig Menschliche an Computern ist, daß 
sie vom Menschen konstruiert sind. Sonst sind Computer dumm; 
sie können nur so arbeiten, wie ihnen durch die Programme vor- 
geschrieben wurde. Diese Programme haben zudem etwas äußerst 
unmenschliches an sich: sie beinhalten vornehmlich sich oft 
wiederholende, routinemäßig ablaufende und stupid geistestö- 
tende Tätigkeiten, die von Computern aber sehr schnell, exakt 
und beliebig oft ausgeführt werden können. 


1.2.2.2 Computer als speicherprogrammierte Anlage 


Früher -und das ist erst etwa 30 Jahre her- war das jeweilige 
Programm als Hardware festverdrahtet: so konnte der Buchungs- 
automat nur die Buchhaltung besorgen, der Fakturiertautomat 
nur Rechungen schreiben und der Sortierautomat nichts als nur 
sortieren. Für jede neue Aufgabe mußte ein neuer Automat ange- 
schafft werden. 

Diesem sicher unwirtschaftlichen Hardware-Prinzip machte John 
von Neumann (1903-1957) mit der folgenden ohne Zweifel revolu- 
tionärsten Idee in der Geschichte der EDV ein Ende:danach ent- 
hielt der Hauptspeicher nicht nur die zu verarbeitenden Daten, 
sondern auch das Programm. Da neben den Daten (was wird 
verarbeitet) auch das Programm ( w ie ist zu verarbeiten) 
geändert und ausgetauscht werden konnte, wurde ein und dersel- 
be Computer (Hardware bzw. Gerät unverändert) zum universellen 
Problemlösungsinstrument (Software bzw. Programm änderbar). 
Die oben angeführten Aufgaben der Buchhaltung, Fakturierung 
wie Sortierung ließen sich von e in e m Computer mit den 
entsprechenden Programmen lösen. 

Das Prinzip der Speicherprogrammierung 
hatte das Hardware-Prinzip abgelöst: e i n Computer mit vielen 
austauschbaren Programmen dient heute vie 1 en Aufgaben. 
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1.2.2.3 Computerrechnen im Dual-System Bit für Bit 


Das Rechnen vollzieht sich in der ALU als Bestandteil der CPU. 
Wie ist dies möglich, wo der Computer doch nur Binärzeichen 
(binär bedeutet zweiwertig) mit den zwei möglichen Zuständen 
0 (kein Strom) und 1 (Strom) unterscheiden kann? Er rechnet 
im 2er-System bzw. Dual-System und nicht wie wir Menschen im 
10er-System bzw. Dezimal-System. 

Addieren wir 5+9 = 14, so erfolgt das berühmte "1 im Köpfchen" 
bei 10, da wir im 10-er System denken. Der Computer führt den 
Übertrag nicht bei 10 durch, sondern bei 2, da er gelernt hat, 
im 2er-System zu funktionieren. Woher aber weiß er, wie groß 
Stellenergebnis und -übertrag sind? Er weiß es durch folgenden 
Trick: Die Addition ist auf die logischen Grundoperationen 
"logisch UND" und "logisch ODER" zurückführbar, und diese Ope- 
rationen lassen sich als Schalter in der ALU darstellen. Damit 
benötigt ein Computer im Grunde nur so wenige Schalter, wie 
logische Operationen darzustellen sind. 


5 + 9 dezimal: 5 + 9 dual: duale Addition 
allgemein: 
3 2 1 0 3 2 1 0 | 
10 70.19, 710 2 2 2 2 0 +0 = DO behalte 0 
0 + 1 = 1 behalte 0 
0 0 0 5 0 1 0 1 +0 = 1 behalte 0 
0 0 0 9 1 0 0 1 1 + 1 = D behalte 1 
0) 0 1 4 1 1 1 0) 
1%#8 + 1%4 + 1#%2 + 0%1 = 14 
1%10 + 4%] = 14 
also: dual 1110 gleich dezimal 14 logisch 





Dezimale Addition 5+9 (links), duale Addition 5+9 (rechts) 


Das Binärzeichen wird als Bit (Binary Digit) abgekürzt. Die 
4-Bit-Folge 1110 als Bitmuster bezeichnet die Dezimalzahl 14. 


1.2.3 Speicherung von Information intern im Hauptspeicher 


Information (Daten, Programme) setzt sich zusammen aus Zeichen 
wie Buchstaben, Ziffern und Sonderzeichen. Da der Computer nur 
ein Bit mit den beiden Werten 0 und 1 unterscheiden kann, muß 
jedes Zeichen als Bitmuster gespeichert werden, z.B. der Buch- 
stabe K durch das Bitmuster 01001011 als 8-Bit-Folge. Auf den 
Datenträgern werden Bits meist durch magnetisierte Punkte dar- 
gestellt. Im Hauptspeicher dagegen werden Bits durch Schalter 
dargestellt, die auf 'aus' für 0 oder auf 'ein' für 1 stehen 
können; der Hauptspeicher als elektronischer Speicher besteht 
aus ICs, deren Schalterstellungen den Bitwerten entsprechen. 
Auf die externe Speicherung auf Datenträgern geht Abschnitt 
1.2.4 ein; dieser Abschnitt wendet sich der internen Speicher- 
ung im Hauptspeicher (auch Arbeitsspeicher genannt) zu. 
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1.2.3.1 Informationsdarstellung im ASCII und EBCDI-Code 


Im Hauptspeicher wird Information vorherrschend im ASCII (für 
American Standard Code for Information Interchange) zu jeweils 
sieben Bits/Zeichen gespeichert. Jedes ASCII-Zeichen wird so- 
mit als Siebenbitmuster dargestellt. Im ASCII werden dadurch 
128 (2 hoch 7) Möglichkeiten computerlesbar erfaßt. 

Unabhängig vom Code faßt man jeweils 8 Bits zu einer Einheit 
zusammen, die man Byte nennt. Beim ASCII als 7-Bit-Code 
ist das 8. Bit eines Byte prinzipiell frei; je nach Anwwendung 
wird es verschieden behandelt (z.B. stets 0 oder zur Aufnahme 
eines Prüfbits). 

Beispiel: 7.25 DM soll im ASCII dargestellt werden, also zwei 
Buchstaben (DM), drei Ziffern (725) und zwei Sonderzeichen ( . 
und Blanc). Man erhält demnach die folgenden sieben Bytes 
00110111 00101110 00110010 00110101 00100000 01000100 01001101 
mit dem Achtbitmuster 00100000 als 5. Byte für das Leerzeichen 
bzw. Blanc. 


IBM-Großcomputer verwenden nicht den ASCII, sondern den EBCDI- 
Code (Extended Binary Coded Decimal Interchange Code), der als 
8-Bit-Code 256 (2 hoch 8) verschiedene Möglichkeiten erfaßt. 


1.2.3.2 Hexadezimale Darstellung von Zeichen 


Die 7 Bytes für 7.25 DM sind nicht gerade leicht zu entschlüs- 
seln. Um der besseren Lesbarkeit willen wird man sich Zeichen 
auf dem Bildschirm oder Drucker nicht als Bitmuster ausgeben 
lassen, sondern hexade z ima |] (auch sedezimal oder 
kurz hex genannt). 


Die hexadezimale Darstellung ist umseitig wiedergegeben. 


1.2.3.3 Hauptspeicher als RAM und ROM 


Der Speicher RAM ist ein Schreib-Lese-Speicher (Random Access 
Memory für Direkt-Zugriff-Speicher); der Benutzer kann in den 
RAM Information schreiben bzw. eingeben wie auch aus dem RAM 
Information lesen bzw. ausgeben. Insbesondere bei Personalcom- 
putern ist der Hauptspeicher als RAM ausgebildet, um das An- 
wenderprogramm und die zu verarbeitenden Daten aufzunehmen. 
Häufig ist ein zusätzlicher Teil des Hauptspeichers als Spei- 
cher ROM vorgesehen (vgl. Abschnitt 1.1.1). Auf diesen Nur- 
Lese-Speicher (Read Only Memory) kann der Anwender nur lesend 
zugreifen. Im ROM als Festspeicher werden z.B. Steuerungspro- 
gramme - vom Hersteller fest eingeschmolzen - bereitgestellt, 
die wir zwar anwenden, aber nicht verändern können. 


Die Informationsdarstellung durch die Codes ASCII sowie EBCDI 
gilt für den Hauptspeicher allgemein - unabhängig, ob er nun 
als Speicher RAM oder als Speicher ROM ausgebildet ist. 
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stellung von 
genau 16 Zeichen 


sıpyvözeEräl 


Hex: Dezimal: Binär: 
0 0 0000 
1 1 0001 
u 0010 | 
3 3 0011 ; = 
4 4 0100 d Ag 
5 05 0107 m | [A 
6 6 0110 = H . 
7 7 0111 | $ 
Be wg 1000 »|® k R 
3 u 1001 2 | \ B 
Ke 1010 2|) n E 
B 11 1011 28 | + Rn 6 
c 12 1100 | - ’ 
BI 78 1101 = |; : 
E 14 1110 - B 
F 15 11171 al w 
a|3 
3 4 v| 
3 s Ä * | 
Hexadezimale Dar- u r 
33 E| - | 
3% Dia 
3C 
30 
3E 


Darstellung von 7.25 DM im 
ASCII hexadezimal: 
37 2E 32 35 20 44 4D 


u 
b 
E 
d 

0 
1 
9 
h 
i 


Darstellung von 7.25 DM im 
EBCDI-Code hexadezimal: 
F7 4B F2 F5 21 cC4 D4 


N+x5<ccHhn 


Die hexadezimale Darstellung 
von 7.25 DM im ASCII sowie 
im EBCDI-Code ist wesentlich 
besser lesbar als die zuge- 
hörige Bitmusterdarstellung. 


NEBEERDERRERSSBELERLERUSKREBEFBELTTLEBSSANSÄTFTELTHTUHTAISREBETELABART |Heradenimeie 
ZRIIARZÄFELAITFLATTIITZZZLLLITHLIZTZARTZTLLLALALRRAS: 


Die Übersetzung binär - hex 
besorgt der Computer selbst. 


( 
} 
? 
8 
A 
B 
Be: 
D 
E 
F 
G 
H 
I 
J 
K 
L 
M 
N 
oO 
P 
a 
A 
5 
T 
uU 
v 
w 
Y 
| 
\ 
) 


Er a A 


Die hexadezimale Darstellung 
stellt nur eine Lesehilfe 
dar. Im Hauptspeicher werden 
die Daten nach wie vor binär 
gespeichert und aufgerufen. 


333332 





BESSHEREPSESENRTERSE 





Die Codes ASCII und EBCDI 


Bei Mikrocomputern bzw. Personalcomputern findet man meistens 
den ASCII. 
Der EBCDI hingegen wird bei größeren DV-Systemen verwendet. 
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1.2.3.4 Byte als Maßeinheit für die Speicherkapazität 


Das Byte dient einerseits zur Darstellung von Zeichen und an- 
dererseits zur Angabe der Speicherkapazität 
10 


1 KB = 1 Kilo-Byte = 2 Bytes = 1024 Bytes = ca. eintausend 
Zeichen Speicherkapazität 
1 MB = 1 Mega-Byte = 1000 KB = 1.024.000 Bytes = ca. eine 


Million Zeichen Speicherkapazität 


Die Angabe '64 KB RAM' oder auch einfach '64 K RAM' bedeutet, 
daß dem Benutzer ein Hauptspeicherplatz von ca. 64.000 Zeichen 
Größe für Programm und Daten zur Verfügung steht. 


1.2.4 Speicherung von Information extern auf Datenträgern 
1.2.4.1 Kassette und Magnetband 


Auf Kasse t t e werden Daten Bit für Bit hintereinander, 
d.h. bitser ie 1 1] , aufgezeichnet. Dies ist bei Audio- 
kassettenlaufwerken der Fall wie bei den eigens für den Conm- 
putereinsatz entwickelten Recordern. Die 8 Bits 01001101 für 
den Buchstaben M stehen auf Kassette also hintereinander. Auf 
das wesentlich breiteren Magnet ban d 1 hingegen passen 
die Bits nebeneinander: demnach liegt beim Magnetband eine 
bitpara 1 le 1 e Aufzeichnung vor. 


Zu unterscheiden sind Start-/Stop-Geräte und Streaming-Geräte: 
Bei den Start-/Stop-Geräten wird blockwei se gespei- 
chert, wobei jeder Block durch Klüfte (Gaps) als Leerräume vom 
nächsten Block getrennt ist. Commodore-Kassetten 2/3000 haben 
z.B. folgendes Aufzeichnungsformat: 

- 10 Sek. Vorspann (leader) 

- 192 Zeichen Fileüberschrift (header) 

- 2 Sek. Kluft (Gap bzw. Vorspann) 


- 192 Zeichen Daten (=1. Datenblock) Datenfile (Daten 
- 2 Sek. Kluft datei) mit 192 
- 192 Zeichen Daten (=2. Datenblock) Zeichen je Block. 


- 192 Zeichen Daten (=n. Datenblock) 
- EOF-Zeichen als Marke für End Of File 





- 10 Sek. Vorspann (leader) 

- 192 Zeichen Fileüberschrift (header) Programmfile mit 

- Programmblock mit 10 KB max 32.000 Zei- 

bis 32 KB Zeichen chen je Block. 

- EOF-Zeichen 
Leerräume bzw. Klüfte kosten Speicherplatz. Sie sind erforder- 
lich, da nur bei gleichmäßiger Bandgeschwindigkeit gelesen und 
geschrieben werden kann. Die Übertragungsraten liegen zwischen 
250 und 1500 Baud bzw. bps (Bits pro Sekunde bei serieller und 
Bytes (Zeichen) pro Sekunde bei paralleler Aufzeichnung). 
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Bei den Streaming - Geräten entfallen die Klüfte und 
Start-/Stop-Marken. Die Daten "'strömen' (to stream) ohne Stops 
in der kompletten Bandlänge in den Hauptspeicher. Streaming- 
Laufwerke werden hauptsächlich zur Datensicherung (Back-Up) 
von Plattendaten (Diskette,Winchesterplatte) verwendet. Strea- 
mer sind billiger, schneller und speicherplatzsparender als 
Start-/Stop-Cartridges; die kleinste Zugriffseinheit aber ist 
das gesamte Band (vgl. Abschnitt 1.2.4.5). 


Wichtige Einsatzgebiete des Bandes sind die Langzeitarchivie- 
rung, die Datensicherung (Back-Up), der Daten- und Programm- 
austausch sowie -vertrieb (Postversand), die Ersterfassung von 
Daten, die Speicherung von Datenbeständen mit Reihenfolgever- 
arbeitung (z.B. Inventar) und die Programmspeicherung. Im Hin- 
blick auf die Kosten je abgespeichertem Byte schneidet kein 
Datenträger besser ab als das Magnetband als de r typische 
Massenspeicher. 

Muß häufig auf Einzeldaten direkt zugegriffen werden, dann 
scheidet das Band (großes Magnetband wie kleine Kassette) aus. 


1.2.4.2 Diskette, Winchesterplatte und Magnetplatte 


Die Speicheroberfläche der Platte als Direktzugriff-Speicher 
ist stets ähnlich organisiert - ob sie als Diskette im Maxi-, 
Mini- oder Mikroformat eingesetzt wird, als Festplatte in Win- 
chster-Technologie, als große Magneteinzelplatte oder als Mag- 
netplattenstapel. Am Beispiel des Softsektor-Formats IBM 3740, 
das bei Mini-Disketten fast zum Standard geworden ist, wollen 
wir die Speicherorganisation der Platte genauer erklären. 


Eine neu gekaufte Diskette ist leer, sie ist weder beschrieben 

noch irgendwie unterteilt. Beim Softsektor-Format IBM 3740 ist 

die Formatierung (Form der Speicheroberfläche festlegen) bzw. 

Sektorierung (Oberfläche in Sektoren als Abschnitte eintei- 

len software mäBß i g durch ein spezielles Programm 

wie folgt vorzunehmen: 

- 77 kreisrunde Spuren vorsehen; bei 2seitiger Diskette bilden 
gegenüberliegende Spuren je einen Zylinder. 

- Jede Spur in gleichlange Sektoren (Abschnitte) gliedern: 26, 
15 oder 8 Sektoren/Spur, je nach der Sektorlänge von 128, 
256 oder 512 Bytes. 

- Spuren numerieren von Spur 00 (außen) bis Spur 76 (innen). 

- Verwendung festlegen: Spur 00 für Inhaltsverzeichnis, Spuren 
01-74 für Benutzerinformation, Spuren 75-76 Fehlerreserve. 

- Die Sektoren durch Klüfte bzw. Gaps trennen, um auf den Sek- 
tor als kleinste Zugriff seinhei t bei 360 Um- 
drehungen/Minute fehlerfrei zugreifen zu können. 

- Die Sektoren unterteilen in ID-Feld (=Identifikationsfeld 
als Adreßfeld) und Daten-Feld (=Benutzerinformation 128, 256 
oder 512 Bytes lang). 
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nummer nummer |nummer | länge 


Speicherorganisation der Platte am Beispiel des 
Softsektor-Formates IBM 3740 für Disketten 


Eine Spur hat weder Anfang noch Ende. Wenn eine Lichtschranke 
das Index 1 och überfährt, wird durch einen Impuls der 
'Spurbeginn' angezeigt. 

Im Gegensatz zur hier erklärten Softsektorierung wird bei der 
hardsektoriert en Diskette die Einteilung hard- 
waremäßig bereits vom Hersteller vorgenommen. 


Bei Einzelplatten wird bi t se r ie 1 1 auf Spuren aufge- 
zeichnet. Die 8 Bits 01001101 für M im ASCII stehen also der 
Reihe nach hintereinander (z.B. auf Spur 34). 

Beim Magnetplattenstapel kann zylinderweise auf den jeweils 
unmittelbar übereinanderliegenden Spuren aufgezeichnet werden. 


1.2.4.3 Klarschriftbeleg als Druckerausgabe 
Auf einem Klarschriftbeleg wird Information in einer für den 
Menschen s o w i e den Computer lesbaren Form extern gespei- 


chert (vgl. Abschnitt 1.2.1.2). Hier die Zeichendarstellung 
bei der heute besonders weit verbreiteten Klarschrift OCR-A: 


ABCDEFGHIJKLMNOPARSTU 
VUXYZ 012345b 789 


Klarschriftbelege werden durch Klarschriftdrucker erstellt, 
bei denen es sich vornehmlich um Typenraddrucker handelt. Hier 
eine kleine Übersicht der Druckertypen allgemein: 








- Zu unterscheiden sind mechanische Drucker (impact) und nicht 
mechanische Drucker (non-impact), serielle Drucker (Zeichen 
für Zeichen drucken) und Zeilendrucker (zeilenweise drucken) 
sowie in einer Richtung und vor/rückwärtsschreibende Geräte. 

- Bei den mechanischen Drucker überwiegen Typenraddrucker und 
Matrixdrucker. 
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- Dopr Typenraddrurcke r hat Typen an Armen (Spei- 
chen) des Typenrades befestigt. Die Räder lassen sich aus- 
wechseln - und damit auch die Schrifttype sowie die Zeichen- 
dichte (z.B. 1/10" = 132 Zeichen/Zeile, 1/12" = 158 Zeichen/ 
Zeile, 1/15" = 198 Zeichen/Zeile). 

Typenraddrucker werden dort eingesetzt, wo es auf die Druck- 
qualität ankommt: z.B. in der Textverarbeitung und der Klar- 
schrifterfassung. Man nennt die auch "Schönschreibdrucker'. 

- Dopr Matrixdrucker erzeugt Zeichen in Form ei- 
ner matrixförmigen Anordnung von Einzelpunkten. Je mehr Roh- 
re bzw. Nadeln pro Matrix (z.B. 7*9- und 7%*5-Matrix), desto 
besser ist das Druckbild. Kann man Matrixpunkte einzeln an- 
steuern, läßt sich der Matrixdrucker zur Ausgabe von Grafik 
(wie Kurven und Bildern) verwenden. 

- Nicht-mechanische anschlagsfreie Drucker arbeiten leiser 

und schneller als Impact-Drucker: dabei handelt es sich um 
Tintenstrahldrucker (Ink-Jet) oder um 
elektrofotografische Verfahren kombiniert mit Laserstrahlen; 
beide Druckertypen arbeiten mit Normalpapier. 
Spezialpapier benötigen die Thermodrucker (wär- 
meempfindliches Papier), die elektrostatischen Drucker (Die- 
lektrikum auf dem Papier) und die Elektroerosionsdrucker 
(Kondensatorpapier). 


1.2.4.4 Schnittstellen als Bindeglieder CPU - Peripherie 


Soll der Informationsaustausch zwischen der CPU und den ange- 
schlossenen Peripheriegeräten bzw. Datenträgern klappen, dann 
müssen die Einheiten zueinander passen, d.h. kompatibel (oder 
besser: steckerkompatibel) sein. Genau als solche Steckverbin- 
dungen kann man sich die Schnittstellen (engl. 
Interfaces) vorstellen. Damit Geräte verschiedener Herstel- 
ler miteinander verbunden werden können, müssen die Schnitt- 
stellen der Geräte genormt sein. Die vier bei Personalcompu- 
tern zumeist anzutreffenden Schnittstellen sind die V.24-, 
die TTY-, die Centronics- und die IEC-Bus-Schnittstelle. 


- Die V.24-Schnittstelle ist eine asynchrone, serielle Schnitt- 
stelle: asynchron bedeutet, daß 2 Geräte trotz verschiede- 
nen Arbeitsgeschwindigkeiten einander angepaßt werden kön- 
nen; seriell heißt, daß Bit für Bit nacheinander übertragen 
werden. Die US-Schnittstelle RS-232-C entspricht der V.24, 
Beide Interfaces findet man in der Datenfernverarbeitung. 


- Als weitere serielle Schnittstelle wurde die TTY-Schnitt- 
stelle vom Fernschreiber (Teletype) übernommen zum Anschluß 
von Bildschirm und Drucker. 


- Nach dem Druckerhersteller Centronics benannt ist eine wei- 
tere Schnittstelle, mit der Drucker anderer Fabrikate ausge- 
rüstet sind. Als parallele Schnittstelle werden 
alle Bits eines Zeichens (Byte) über 8 parallele Leitungen 
übertragen (gleichwohl: bitparallel, aber zeichenseriell). 
Die Centronics-Schnittstelle ist heute zum Quasi-Standard 
bei Druckern geworden; dabei wird zumeist ein 36-poliger 
AMP-Stecker verwendet mit nur teilweise genormter Pinbele- 
gung (exakte Belegung der Pins dem Handbuch zu entnehmen). 


16 1 Computer allgemein 


- Die IEC-Bus-Schnittstelle umfaßt 8 Daten-, 3 Quittungs- und 
5 Steuerleitungen, um bis zu 15 Peripheriegeräte an einen 
Computer anzuschließen. 


Exakt beschriebene Schnittstellen gehen einher mit dem Trend 
zur "Mixed Hardware' als dem Zusammenschluß von Peripheriege- 
räten unterschiedlicher Herstellermarken. Dies wiederum führte 
zur steten Ausweitung des OEM-Marktes (Original Equipment Ma- 
nufacturer). Ein OEM ist ein Gerätehersteller, der seine Pro- 
dukte nicht (nur) an Endabnehmer verkauft, sondern ebenso an 
andere Hersteller; auf dem OEM-Markt besorgen sich Computer- 
hersteller Peripherie-Geräte, die sie in ihr System integrie- 
ren. So kann sich z.B. hinter dem IBM-Typenschild eines Druck- 
ers, den IBM für seinen Personalcomputer anbietet, durchaus 
ein EPSON-Drucker verbergen. 


1.2.4.5 Back-Up-Systeme zur Datensicherung 


Für Personalcomputer -autonom als Stand-alone-Systeme genutzt- 
bietet sich folgender Mix für die externen Speichergeräte an: 


Datenverarbeitung Datensicherung 













Für Daten/Programme; 
IMAGNETBAND 
als Massenspeicher 





Für die Daten: 
WINCHESTER-PLATTE 
als Festplatte 








Für die Programme: | 
DISKETTE (FLOPPY) | 
als Wechselplatte 
















Externspeicher zur Datenverarbeitung und zur Datensicherung 


Festplatten-Laufwerke bringen dem Anwender von Personalcompu- 
tern die gewünschten hohen Speicherkapazitäten, zugleich aber 
auch das Problem der Datensicherung bzw. des Back-Up ( 1 DIN- 
A4-Seite = ca. 2 KBytes; 20 MBytes auf einer Festplatte = ca. 
10 Karl-May-Bücher; 1 MBytes eintippen = ca. 10 Manntage). Bei 
Programm- oder Bedienungsfehler, Defekt des Externen Speichers 
oder des Computers selbst könnten die Daten zerstört werden; 
deshalb müssen Sicherungskopien der Daten erstellt werden. Bei 
Back-Up-Systemen als Reserve- bzw. Sicherungssysteme (Back-Up 
heißt: Zeichen für Zeichen z.B. auf Band kopieren) gibt es 
Disketten, Wechselplatten und Bänder als Sicherungsdatenträger 
(letztere im Start-Stop- sowie im Streaming-Betrieb (Abschnitt 
1.2.4.1)). Mit dem zunehmenden Umfang der zu sichernden Daten- 
bestände wird sich das Magnetband als Streamer durchsetzen: so 
kann ein Cartridge-Tape-Streamer den Inhalt einer 20-MB-Fest- 
platte in wenigen Minuten kopieren und damit sichern. 


Bei dieser Art der Datensicherung werden die Sicherungskopien 
in einem gesonderten Arbeitsgang z.B. allabendlich oder zwei- 
mal je Woche durchgeführt. Anders geht dass Loggingvor, 
bei dem sämtliche über Tastatur eingegebenen Daten von einem 
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Datensicherungsprogramm automatisch auf einer Zusatzdatei mit- 
geschrieben werden; diese Datei wird auch 'Log-Datei' genannt. 
Die Datensicherung wird also bereits im Rahmen der Datenerfas- 
sung vorgenommen - dieser Erfassung wenden wir uns jetzt zu. 


1.2.5 Verfahren der Datenerfassung 


Datenerfassung heißt, Daten in computerlesbare 
Form bringen (vgl. Abschnitt 1.2.1.1) und umfaßt den Weg von 
der Entstehung der Daten bis zu deren Eingabe in die CPU. Da 
im kaufmännischen Bereich ca. 90% des Zeitaufwandes auf diesen 
Weg entfallen, ist der Kostenanteil der Datenerfassung relativ 
hoch anzusetzen. 
Die unterschiedlichen Verfahren der Datenerfassung 
werden festgelegt durch vier Faktoren: 
1) Anzahl der St uf en ,„ die die Daten von der 
Entstehung bis zur Eingabe durchlaufen. 
2) Verbindung zwischen Erfassungsgerät und CPU zum Zeitpunkt 
der Erfassung: off - line oder on - line, 
3)zentrale oder dezentrale Durchführung 
der Erfassung. 
4) Erfassungsgerät mit eigener Intelligenz ausge- 
stattet oder nicht. 
Auf diese Faktoren wollen wir nun im Überblick näher eingehen. 


Zunächst ist eine einstufige, zweistufige und dreistufige Da- 
tenerfassung zu unterscheiden. 


ENTSTEHUNG DER DATEN DEZENTRAL IM BETRIEB 


=. = zz zz oz zz oo > _ > ser pp os pe oe op oe > pp > „> m — pp pop op op ep  _ „> > — .  .z =. 


Eine Stufe: 


Urbeleg oder 
beleglos 


Urbeleg nicht 
computerlesbar 
(z.B. Rechnung) 


Übertragung auf computerlesbarer 

Datenträger Beleg = Datenträger 
(z.B. Disket- (z.B. Band in Kasse 
tenschreiber) mitlaufend) 


| 
Eingabe in CPU Eingabe in CPU 
(z.B. durch Dis- (z.B. durch Band- 
ketteneinheit) einheit) 


m a an m HE a a a a a a a a a a ———— - oo. —--o-- - ee. -. -. -_—- =. 


Eingabe in CPU 
direkt über 
Dialoggerät 


v 


VERARBEITUNG DER DATEN ZENTRAL IN DER CPU 


Die "klassische Datenerfassung' durchläuft drei Stufen: Er- 
stellen des Urbelegs, Übernehmen auf Datenträger und Eingeben 
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in die CPU. Werden Urbeleg und Datenträger gleichzeitig er- 
stellt, dann verkürzt sich das Vorgehen auf zwei Stufen. Mit 
der Bildschirmerfassung sowie der Erfassung über Scanner bzw. 
Lesestift kommt man zur einstufigen Direkterfassung. Beispiel: 
POS - System (Point-of-Sales-System, Verkaufspunkte-System). 


Bei der Off-line-Erfassung erfolgen Erfassung und Verarbei- 
tung vollständig getrennt voneinander. Beim Datensammelsystem 
z.B. wird zunächst von mehreren Erfassungsplätzen ein gemein- 
samer Datenträger erstellt, der dann später zur Verarbeitung 
weitergegeben wird. 

Bei der On-line-Erfassung gelangen die Daten direkt in die CPU 
(an die Stelle des Datenträgertransports tritt also die Daten- 
übertragung). Der große Vorteil der on-line gegenüber der off- 
line durchgeführten Erfassung liegt in der Zeitersparnis. Als 
nachteilig kann sich der Umstand auswirken, daß während der 
Erfassung die CPU für andere Arbeiten blockiert ist. 


Dezentrale Erfassung heißt, Daten am Ort ihrer Entstehung zu 
erfassen - z.B. im Lager und beim Verkauf. Die mobile Datener- 
fassung über tragbare Personal- u. Mikrocomputer zählt hierzu. 
Bei der zentralen Erfassung hingegen bringt man alle Urbelege 
an eine bestimmte Stelle (Beispiel: Datensammelsystem). 


Datenerfassungsgeräte werden zunehmend mit eigener Intelligenz 
ausgerüstet. Oder anders ausgedrückt: Zur Erfassung greift man 
immer häufiger auf Mikrocomputer zurück, die z.B. wahlweise 
on-line an einen Großcomputer angeschlossen sind und off-line 
als selbständige Computereinheit (Stand-alone-System) genutzt 
werden. 


1.2.6 Computertypen 


Zunächst: Wenn vom "Computer' die Rede ist, dann ist damit im- 
mer der frei programmierbare Allzweckrechner bzw. General-Pur- 
pose-Computer gemeint, nicht jedoch der Spezial-"Computer" wie 
z.B. eine Datenbank-Maschine (vgl. Abschnitt 1.3.5.6) oder ein 
Textverarbeitungs-Automat. 

zu den zahlreichen Typologien für Computer soll hier keines- 
falls eine weitere hinzugefügt werden. Anhand der beiden Ex- 
treme "Personalcomputer' und "'Großcomputer' soll allein eine 
Orientierungshilfe gegeben werden. 


1.2.6.1 System-Konfigurationen für Personal- und Großcomputer 


Eine System-Konfiguration gibt an, wie periphere Einheiten um 
eine CPU zu einem funktionsfähigen DV-System zusammengestellt 
sind. Zunächst eine Gerätezusammenstellung, wie sie für Perso- 
nalcomputer typisch ist. Die Geräte werden dabei zeichnerisch 
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al N JH Be 


Tastatur mit 
Bildschirm 


Zentral- 
einheit 


(ZE) 





Disketten- Kassetten- 
einheit einheit 


Für Personalcomputer typische System-Konfiguration 


durch Sinnbilder dargestellt, die nach DIN 66001 genormt sind. 
Der Personalcomputer -für den persönlichen Gebrauch und durch- 
aus auch zur beruflichen Nutzung gekauft- soll hier nicht von 
Bezeichungen wie Privat-Computer, Tischcomputer, Heimrechner, 
Spielcomputer und Kleinrechner abgegrenzt werden; dazu schrei- 
tet die Entwicklung viel zu schnell voran. Vielmehr soll der 
Personalcompurter als extremes Gegenstück zur 
Kategorie der Großcomput er aufgefaßt werden „ die 
z.B. mit je fünf Band- und Platteneinheiten als Externspeicher 
ausgerüstet sein können. Großcomputer werden in Rechenzentren 





| 5 Bandeinheiten 
= Een 5 Plattenstapel als 
peicher | Direktzugriff-Speicher 


5 Magnetbandschreiber 
zur Datenerfassung 


Für Großcomputer typische System-Konfiguration 


betrieben - sei es im unternehmenseigenen Rechenzentrum oder 
im Sevice-Rechenzentrum von einem freien, herstellereigenen 
bzw. kooperativen DV-Dienstleistungsunternehmen. Die Sinnbil- 
der für Band und Platte werden oft auch für Kassette und Dis- 
kette verwendet. 

zwischen dem Personalcomputer als unterem und dem Großcomputer 
als oberem Extrem gibt es zahlreiche Abstufungen wie z.B. An- 
lagen der Mittleren Datentechnik (MDT), Minicomputer, Büro- 
Computer oder auch Small-Business-Computer. Ebenso können meh- 
rere Computer zu einem Rechnerverbund vernetzt sein (Netzwerk) 
mit Satelliten-Computern, die selbständig als Stand-alone- 
System und/oder on-line mit einem Haupt-Computer arbeiten. Da- 
bei sind Personalcomputer häufig Teil eines Großcomputers. 
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Großcomputer werden oft als Mainf rame s bezeichnet 
und damit von der anschließbaren Peripherie abgegrenzt. Per- 
sonalcomputer zählen immer häufiger zu dieser Peripherie. 


1.2.6.2 Eigenschaften von Personalcomputern 
Personalcomputer weisen allgemein folgende Eigenschaften auf: 


1) Autonom arbeitendes DV-System mit zumindest einem 
Externspeicher. 

2) CPU mit mindestens 64 KB RAM für Benutzerdaten und 
Benutzerprogramme. 

3) Verfügbarkeit mindestens einer höheren Programmier- 
sprache (Basic, Pascal, Forth, ...). 

4) Möglichkeit, in Maschinensprache (Assembler) zu 
programmieren. 

5) Betriebssystem ermöglicht Dialog zwischen 
Benutzer und Computer. 

6) Exakt beschriebene Schnittstellen. 


Wünschenswert ist, daß Personalcomputer hardwaremäßig wie auch 
softwaremäßig kompatibel sind. So sollten Programmiersprachen 
wie Basic und Pascal genormt sein, für die Externspeicher ein- 
heitliche Aufzeichnungsformen übernommen werden (z.B. für Dis- 
ketten das Softsektor-Format IBM 3740) und übereinstimmende 
Schnittstellen definiert sowie steckermäßig vorgesehen sein 
(z.B. gesamten Systembus an eine Steckerleiste herausführen, 
damit der Anwender das System später erweitern kann). Doch wa- 
rum auch soll eine CBM-Floppy zu einem Apple passen, wenn ein 
Opel-Vergaser nicht zu einem Ford paßt; und warum soll das BA- 
SIC-Programm eines Alphatronic auf einem IBM-PC laufen, wenn 
das Motoröl eines VW nicht für einen Mercedes geeignet ist? 


Häufig werden für Mikrocomputer die vier Kategorien Handcompu- 
ter (HC), Videocomputer (VC), Personalcomputer im engeren Sin- 
ne (PC) und Tragbare Computer (Portables) gebildet. 


Handcompurter cd(HC) : 
Hand-Held-Computer, Pocket-Computer, Briefcase-Computer,. 
Tastatur mit Zeilendisplay, Module. Taschenrechnerformat. 


videoconputer _(d(VC): 
Tastatur mit Videoanschluß; zunehmend Diskettenlaufwerke 
anschließbar. Ausbaumöglichkeit in Richtung PC. 


Personalcompurter (EC): 
Tastatur, Diskette und/oder Hard-Disk, Monitor. Zunehmend 
16-Bit-Mikroprozesor. Monitor, Mehrere Betriebssysteme, 


Portable Computer: 
Tastatur, CPU, Diskette und Monitor als eine Einheit, als 
Koffer tragbar. 


Vier Kategorien von Mikrocomputern 


‚Daneben unterscheidet man nach der Nutzungsart Homecomputer 
(privat) und professionelle Computer (beruflich). 
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Die VCs müssen an einen Bildschirm angeschlossen werden. Dies 
kann ein normales Fernsehgerät sein, das jedoch aufgrund der 
geringen Auflösung (960 Zeichen pro Bild) für Grafik wie auch 
längere Benutzung nur bedingt geeignet ist. Auch VCs benötigen 
einen Monitor (ca. 2000 Zeichen pro Bild), der eine wesentlich 
ruhigere Bildwiedergabe bietet. 

Die Portables -Neuentwicklungen oder aber Abkömmlinge von be- 
reits bewährten PCs- werden häufig zur mobilen Datenerfassung 
eingesetzt. 

Vergleicht man den Markt der Mikros mit dem der PKWs, so stel- 
len die PCs die "'normalen' Limousinen dar, während HCs, VCs 
und Protables dann die Minis, Cabrios usw. ausmachen. 


1.2.6.3 Personalcomputer im Computer-Netzwerk 


Sinkende Hardware-Kosten und eine ständig zunehmende Zahl von 
Informationsquellen führen immer häufiger zur Vernetzung meh- 
rerer Personalcomputer zu einem lokalen Net z . Das 
Attribut 'lokal' verweist auf einen begrenzten Wirkungsbereich 
wie eine Abteilung oder ein Gebäude (sog. Inhouse-Netz); auch 
hierzulande spricht man dabei von LANs (Local Area Network). 


Es gibt Netze mit Stern-, Ring- oder Bus-Struktur. Bei stern- 
förmiger Anordnung ist jeder Computer mit einer zentralen Ein- 
heit verbunden, die verwaltet und die Netz-Leistung begrenzt; 
fällt sie aus, so bricht das gesamte Netz zusammen. Die Ring- 
Anordnung ist billiger, doch auch hier führt der Ausfall einer 
Station zum Ausfall des gesamten Netzes. Dies ist nicht so bei 
der Bus-Anordnung als weitverbreitetem Konzept: über eine Sam- 
melschiene kann jede Station mit jeder Station in Kontakt tre- 
ten. Das von Xerox, Intel und DEC entwickelte Netz 'Ethernet' 
weist eine Bus-Struktur auf und stellt durch seine große Ver- 
breitung einen Quasi-Standard dar. 

Es gibt Netze mit und ohne Master-Controller. Der Masterbild- 
schirm weist die höchste Priorität auf und ist zumeist softwa- 
remaßig ansteuerbar; gegenüber der hardwaremäßigen Verdrahtung 
ist dies bei Ausfall des Masterbildschirms (andere Station als 
Master ansteuern) von Vorteil. 

EIn Netz verfügt oft nur über einen oder zwei Drucker, die mit 
Drucker - Spo o l in g angesteuert werden. Anstatt Daten 
direkt auf den Drucker auszugeben, "drucken' die Stationen 
auf eine Platte (Zwischenspeicher), deren Information automa- 
tisch durch ein Spooler(-programm) ausgedruckt wird. 

Spool steht für 'simultaneous peripheral operations on-line'. 


Personalcomputer finden nicht nur intern im lokalen Netz Ver- 
wendung, sondern ebenso im 6ffentlichen Netz 
extern. So im BTX-Netz als BTX-Editierplatz des Informations- 
anbieters, als BTX-Terminal des Konsumenten oder als Kommuni- 
kationssystem für kleinere Firmen. 

Nach Datex, Datex-L, Telex, Teletex und BTX werden Personal- 
computer sicher auch in dem von der Post geplanten Netz ISDN 
(Integrated Services Digital Network) eingesetzt werden, das 
Daten, Text, Standbilder wie auch Sprache übermitteln wird. 
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Personalcomputer werden von Beginn an primär als Stand - 
Alone - Syst em autonom für sich alleine verwendet. 
Man spricht auch vom Single-User-Betrieb. 

Vernetzt man mehrere Personalcomputer, so gelangt man zu einem 
Multi - User - Betrieb , bei dem mehrere User 
(Benutzer) über ihre PCs als Terminals verbunden sind. 
Single-User-Betrieb wie auch Multi-User-Betrieb können unter 
Multitasking laufen; dabei werden mehrere Aufgaben 
als Tasks quasi gleichzeitig durch e i n e CPU abgearbeitet. 
Multiusing und Multitasking stellen hohe Anforderungen an das 
Betriebssystem (z.B. MP/M und Concurrent CP/M; siehe Abschnitt 
1.3.6.6). 


1.3 Software = Daten + Programme 


1.3.1 Software im Überblick 


Software ist Information und wird unterteilt in 
Daten und Programme (vgl. Abschnitt 1.1.1). Auf 
diese beiden Komponenten der Software wollen wir nun eingehen. 


1.3.1.1 Begriffsbildungen für Daten 


Sieben wichtige Begriffspaare für Dat en wollen wir näher 
betrachten. 


Stammda t en bleiben normalerweise über einen längeren 
Zeitraum hinweg konstant (z.B. Artikelstammdaten, Kundenstamm- 
daten, Personalstammdaten), Änderungsdaten _die- 
nen der Anpassung von Stammdaten. 

Im Gegensatz zu Stammdaten erfahren Bestandsdaten 
oftmalige Änderungen, die durch Bewegungsdaten 
vorgenommen werden (Zugang für + und Abgang für -); letztere 
werden kurz auch als Bewegungen bezeichnet. Die Lagerbestands- 
fortschreibung nach der Formel "Anfangsbestand + Zugänge - Ab- 
gänge ergibt Endbestand' gehört in diese Kategorie von Daten. 
Ordnungsdaten legen eine Speicherungs-, Sortier- 
bzw. Verarbeitungsfolge fest, Mengendat en hingegen 
eine Anzahl (Stück, Größe, Gewicht, Preis). 

Mt numerischen Dat en bzw. Zahldaten rechnet 
jeder Computer, nicht jedoch mit Text daten. Letztere 
umfassen beliebige Zeichen, die stets zwischen Gänsefüßchen 
oder Hochkommata stehen, und werden auch als alphanumerische 
Daten, als Zeichenkettendaten oder als Strings bezeichnet. 
Unformatierte Dat en weisen keine einheitli- 
che Form auf. In der kommerziellen Datenverarbeitung überwie- 
gen formatierte Daten : auf einem Rechnungs- 
formular stehen z.B. die Dezimalpunkte der DM-Beträge unter- 
einander, jeweils auf 2 Nachkommastellen gerundet. 
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Begriffspaar: Beispiel: 
1) Stammdaten 1019 als Kundennummer 
oder 
Anderungsdaten 1019007 als neue Kundennummer im 
Postleitzahlgebiet 7 
2) Bestandsdaten 256 als Lagermenge 
oder 
Bewegungsdaten 70 Stück als Lagerbestandszugang 
3) Ordnungsdaten 6 für Artikelfarbe "gelb" 
oder 
Mengendaten 8 kg als Bestellmenge 
4) Numerische Daten Zahl 10950.25 als Rechnungspreis 
oder 
Textdaten "Gulden" als Währungsbezeichnung 


5) Unformatierte Daten Zwei ungeordnete Positionen 265.65 DM 


oder 9 DM 
Formatierte Daten Zwei geordnete Positionen 265.65 DM 
9.00 DM 


6) Einfache Datentypen 50 als e i n e Menge 
oder 
Strukturierte Datentypen bzw. Datenstrukturen 
50 24 98 33 102 als f ün f Mengen 
7) Im Programm gespeicherte Daten 6% als Rabattsatz 
oder 
Getrennt vom Programm gespeicherte Daten bzw. Dateien 
Kunden d a t e i mit 2680 Kunden 


Sieben Begriffspaare für Daten 


Mit die wichtigste Unterscheidung ist die von einfachen Daten- 
typen und Datenstrukturen: 

Einfache Datentypen bestehen aus jeweils 
nur einem einzigen Datum, so aus einer Ganzzahl (INTEGER), aus 
einer Dezimalzahl (REAL) oder aus einem Textwort (STRING). Die 
Datenstrukturen als strukturierte Datentypen 
hingegen umfassen jeweils mehrere Daten, die unterschiedlich 
z.B. als Feld (ARRAY), Verbund (RECORD) oder Datei (FILE) an- 
geordnet sein können. In Abschnitt 1.3.5 werden die Datentypen 
im Zusammenhang mit der Datei genauer erklärt. 


Einzeldaten und kleinere Datenbestände lassen sich innerhalb 
eines Programmes speichern, so z.B. der Rabattsatz in einem 
Rechnungsschreibungsprogramm. Die umfangreichen in der kommer- 
ziellen Datenverarbeitung zu verarbeitenden Datenbestände wer- 
den getrennt vom Programm als Dat ei auf Platte 
oder Band als externem Speicher untergebracht. 


1.3.1.2 Begriffsbildungen für Programme 


Man unterscheidet Anwenderprogramme sowie Systemprogramme. 
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Programme 
Anwenderprogramme Systemprogramme 

vom Anwender von Software- Steuer- Dienst- Übersetzer- 
selbst haus fremd pro- pro- programm 
erstellt bezogen gramm gramm 
z.B. eigene z.B, z.B. 2,2% Z.B. BASIC, 
Rechnungs- Tabellen- Dialog Sortier- PASCAL, 
schreibung kalkulation Mensch- programm Cobol, 

Computer FORTH, € 


Anwenderprogramme (Problem) und Systemprogramme (Computer) 


Anwenderprogramme lösen die konkreten Prob- 
leme des jeweiligen Anwenders und werden auch Benutzer- bzw. 
Arbeitsprogramme genannt oder unter der Bezeichnung Anwender- 
Software zusammengefaßt. Anwenderprogramme können vom Anwender 
selbst erstellt und programmiert oder fremd von einer Soft- 
warefirma bezogen sein. Zwischen diesen beiden Extremen gibt 
es zahlreiche Abstufungen: so z.B. im Falle der individuellen 
Anpassung standardisierter Anwender-Software. Auf das Anpassen 
wie auch Erstellen von Anwenderprogrammen gehen die Abschnitte 
1.3.7 und 1.3.8 näher ein. 


Gegenstück sowie Ergänzung zu den Anwenderprogrammen sind die 
Systemprogramme „deren Gesamtheit als Betriebs- 
system bezeichnet wird, da sie den geordneten Betrieb 
des jeweiligen DV - Sys te ms gewährleisten. Ganz allge- 
mein wird das Betriebssystem oft als OS (Operating System) und 
als DOS (Disk Operating System, da plattenorientiert) bezeich- 
net. Jedes Betriebssystem umfaßt drei Arten von Systemprogram- 
men: 

Die Steuerprogramme steuern das Zusammenwirken 
der Peripherie mit der CPU und die Ausführung eines Programms. 
Die Dienstprogramme bzw. Utilities sind zwar 
nicht unbedingt notwendig, werden aber als unerläßlicher Kom- 
fort zum einfachen und benutzerfreundlichen Betrieb des Compu- 
ters angesehen (ein Programm zur Herstellung einer Disketten- 
kopie gehört eben einfach 'dazu'). Steuer- und Dienstprogramme 
bilden oft eine Einheit: ein Editor z.B. dient zumeist 
nicht nur dem Eintippen und Bearbeiten von Programmtext über 
einen Bildschirm, dem sog. Editieren also, sondern ebenso dem 
Abspeichern dieser Texteingabe auf Diskette oder Band, und da- 
mit der Ein-/Ausgabesteuerung. 

Ein Übersetzerprogramm übersetzt ein in 
einer Programmiersprache wie z.B. BASIC codiertes Anwenderpro- 
gramm in die Muttersprache des Computers, bzw. in die 0/1-Form. 
Das ist vergleichbar mit der Tätigkeit eines Dolmetschers, 
der Sätze aus einer Fremdsprache (z.B. Englisch) in die eige- 
ne Muttersprache (z.B. Deutsch) übersetzt. Ein Computer ver- 
steht so viele Fremdsprachen bzw. Programmiersprachen, wie 
Übersetzerprogramme vorhanden sind. Die meisten Personalcompu- 
ter verstehen die Programmiersprachen BASIC und z.T. PASCAL, 
da die zugehörigen Übersetzerprogramme beim Kauf automatisch 
mitgeliefert werden. 
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Was für das Auto das Benzin bedeutet, um von Astadt nach Bdorf 
fahren zu können, das bedeutet für die Computer-Hardware das 
Betriebssystem „um ein Anwenderprogramm ausfüh- 
ren zu können. In Abschnitt 1.3.6 wenden wir uns dem Betriebs- 
system genauer zu. 


Wie für Daten allgemein Datenstrukturen unterschieden wurden, 
so werden für Programme (Anwender- wie Systemprogramme) übli- 
cherweise vier Programmstruktvuren definiert. 


(1) Folgestrukturen: Lineare Prgramme 

(2) Auswahlstrukturen: Verzweigende Programme 

(3) wiederholungsstrukturen: Programme mit Schleifen 

(4) Unterprogrammstrukturen: Programme mit Unterabläufen 


Vier grundlegende Programmstrukturen 


Diese Programmstrukturen werden als "Bausteine der Software' 
bezeichnet, da die Analyse noch so komplexer Programmabläufe 
stets zu diesen Strukturen als Grundmuster führt. Abschnitt 
1.3.3 erklärt diese Programmstrukturen an kleinen Beispielen 
und Abschnitt 1.3.4 im Zusammenhang mit den Datenstrukturen. 


1.3.2 Datentypen und Datenstrukturen 


Im vorangehenden Abschnitt wurden sieben Daten-Begriffe ange- 
führt, darunter der Begriff des Datentyps. Dieser 
Begriff ist grundlegend für die Programmierung. Wir wollen ihn 
erklären: es gibt einfache und strukturierte, statische und 
dynamische sowie standardmäßig vorhandene und benutzerseitig 
definierbare Datentypen. 


1.3.2.1 Einfache Datentypen als 'Moleküle' 
Einfache Datentypen lassen sich nicht weiter zerlegen und wer- 
den deshalb auch als elementare, skalare sowie unstrukturierte 


Datentypen bezeichnet. Diese Typen enthalten deswegen stes nur 
ein einziges Datum und stellen sozusagen die 'Moleküle' der 


Bezeichnung: Beispiel: Wertebereich: 


CHAR Einzelzeichen D Zeichen (numerisch, al- 
pha, Sonderzeichen) 


INTEGER Ganzzahl 126 Ganze Zahlen 
REAL Dezimalzahl 126.75 zahlen mit Dezimalpunkt 
STRING Text, Zeichen- "DM-Wert'" Gesamter Zeichen- 

kette vorrat des Computers 
BOOLEAN Logisch 1 Wahrheitswerte TRUE (1, 


wahr), FALSE (0O,unwahr) 


Fünf einfache bzw. elementare Datentypen 
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Daten dar, da sie vom Programmierer nicht - so ohne weiteres - 
unterteilt werden können. 

Der Datentyp CHAR umfaßt nur e i n Zeichen. Als STRING (Text) 
gilt alles, was zwischen Gänsefüßen steht, also auch der Text 
"99,50 DM Endsumme". Numerische Typen sind INTEGER oder REAL. 
Der Datentyp BOOLEAN kennt nur die 2 Werte TRUE (z.B. Stamm- 
kunde) oder FALSE (kein Stammkunde). 


1.3.2.2 Datenstrukturen als strukturierte Datentypen 


Strukturierte Datentypen sind neben anderen der ARRAY (Liste) 
und der RECORD sowie das FILE. Dabei werden mehrere Daten un- 
ter einem Namen zusammengefaßt abgelegt. Der ARRAY wird auch 
als Feld, Tabelle und Bereich bezeichnet und enthält Komponen- 


Bezeichnung: Beispiel: Kennzeichen: 


ARRAY (eindimensional) [12 3 44 56 21 Komponenten alle mit 
Vektor denselben Datentypen 
(hier 5 Mengen) 





Komponenten alle mit 
denselben Datentypen 
(hier 4*3=12 Preise in 
4 Zeilen u. 3 Spalten) 


ARRAY (zweidimensional) 
Matrix 





RECORD 101 (=Nr,.) Komponenten mit unter- 
Verbund, auch Satz FREI (=-NAME) schiedl. Datentypen 
65000 (=UMSATZ) (hier: INTEGER, STRING 
u. REAL (Kundensatz)) 


SET () (1) (2) (12) Komponenten sind Teil- 
Menge für SET OF 1..2 mengen der Grundmenge 
FILE über 1000 Sätze Datei als Sammlung von 
Datei der KUNDENDATEI Datensätzen auf einem 
Externspeicher 


Vier wichtige Datenstrukturen 


ten bzw. Elemente gleichen Typs. Beim eindimensionalen ARRAY 
sind die Elemente in Reihe angeordnet wie im Beispiel die 5 Wo- 
chentagabsatzmengen 12, 3, 44, 56 und 21 „ während sich der 
zweidimensionale ARRAY in zwei Richtungen ausdehnt: waagerecht 
in Zeilen (hier 4 Zeilen) und senkrecht in Spalten (hier 3 
Spalten). Es gibt nicht nur Integer-Arrays (alle Elemente sind 
ganzzahlig) und Real-Arrays (alle Elemente sind Kommazahlen), 


sondern z.B. auch String-Arrays wie 'MO, DI, MI, DO, FR, SA' 
oder 'HAMMER, MEISEL, SAEGE' (alle Elemente sind Textworte). 


Im Gegensatz zum ARRAY können im RECORD auch Daten verschiede- 
ner Datentypen abgelegt sein. Der oben wiedergegebene RECORD 
verbindet drei Komponenten vom Typ INTEGER (Kundennummer ganz- 
zahlig), STRING (Kundenname stets Text) und REAL (Kundenumsatz 
als Dezimalzahl) - deshalb auch die Bezeichnung 'Verbund'. In 
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der kommerziellen DV entspricht diese Datenstruktur häufig den 
Datensätzen bzw. Komponenten von Dateien wie hier der Kunden- 
datei. 


Unter einer Datei versteht man allgemein eine Sammlung von Da- 
tensätzen, die getrennt vom Programm auf einem Externspeicher 
(Diskette, Platte, Kassette, Band) als selbständige Einheit 
gespeichert sind. Die Datensätze stellen die Datei-Komponenten 
dar und weisen alle denselben Datentyp auf, d.h. sie sind alle 
z.B. vom Typ RECORD oder alle vom Typ ARRAY. Eine Datei bzw. 
ein FILE kann viel größer sein als der im Hauptspeicher ver- 
fügbare Speicherplatz. 


1.3.2.3 Statische und dynamische Datentypen 


Datenstrukturen können statisch oder aber dynamisch vereinbart 
sein. 

Statische Datentypen behalten während der Programnm- 
ausführung ihren Umfang unverändert bei. Beispiel: Beim Beginn 
eines Programms wird vereinbart, daß ein eindimensionales Feld 
bzw. Array mit 5 Elementen zur späteren Aufnahme und Verarbei- 
tung der Absatzmengen für die 5 Wochentage Mo - Fr eingerich- 
tet wird. Statisch heißt, daß die Anzahl der Feldelemente wäh- 
rend der Programmausführung gleich bleibt, während sich ihre 
jeweiligen Inhalte ändern können. 


Bei dynamischen Datentypen muß die Anzahl der Kom- 
ponenten nicht bereits beim Schreiben des Programms festgelegt 
werden, sondern erst im Zuge der Programmausführung. Die Datei 
bzw. das FILE ist stets als dynamischer Datentyp vereinbart. 
Warum? Beim Anlegen einer Kundendatei werden z.B. 455 Kunden 
in 455 Datensätzen auf Diskette erfaßt. Diese Zahl von 455 Da- 
teikomponenten muß veränderbar sein, um neue Kunden aufnehmen 
und Ex-Kunden löschen zu können. Da die Änderungen aber 'tri- 


Datenstrukturen 

STATISCH DYNAMISCH 
Werte ändern sich, niemals Werte sowie Struktur (Anzahl, 
aber die Anzahl. Aufbau) ändern sich. 
Anzahl der Komponenten Anzahl und Aufbau der Kompo- 
ist konstant. nenten ist variabel. 
Belegter Speicherplatz Belegter Speicherplatz 
ist konstant, ist variabel, 
unstrukturiert: unstrukturiert: 
Char, Integer, Real, zeiger als Hilfsmittel. 
String, Boolean strukturiert: 
strukturiert: Datei (File), 
Feld (Array), Stapel (Stack), Schlange, 
Menge (Set), Gekettete Liste (Linked List), 
Verbund (Record). Binäre und andere Bäume, 


Rekursive Datenstrukturen. 


Einige dynamische Datentypen 
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vialer Natur" sind (so Niklaus Wirth, der Erfinder von PASCAL), 
zählt man eine Datei zu den statischen Datenstrukturen. Die 
dynamischen Datenstrukturen können vom Programmierer selbst 
durch Verknüpfung der standardmäßig angebotenen Datentypen 
konstruiert werden. Das heißt, daß alle dynamischen Strukturen 
auf einer tieferen Komponenten-Ebene irgendwo wieder statisch 
sind; Listen- (z.B. verkettete Liste) und Baumstrukturen ge- 
hören dazu. Zeiger (auch Pointer, Verweis, Referenz genannt) 
werden dabei als Hilfsmittel zur Strukturierung verwendet. Auf 
Zeiger bzw. Listen gehen wir in Abschnitt 3.13 ein. Die Rekur- 
sion als Ablauf, der sich selbst aufruft bzw. zur Ausführung 
bringt, bildet (generiert) dynamisch lokale Variable und wird 
deshalb häufig im Zusammenhang mit dynamischen Datenstrukturen 
genannt. 


1.3.2.4 Vordefinierte und benutzerdefinierte Datentypen 


Die bislang dargestellten einfachen und strukturierten Daten- 
typen sind vordefiniert in dem Sinne, daß sie als 
Standardtypen vom DV-System bereitgestellt werden. Daneben ge- 
statten einige Programmiersprachen wie z.B. PASCAL dem Pro- 
grammierer, selbst eigene Datentypen zu definieren, die dann 
eben alsbenutzerde f ini er t bezeichnet werden. 


Eine einfache Möglichkeit dafür besteht darin, alle Werte auf- 
zuzählen, die der Datentyp umfassen soll - deshalb der Begriff 
Aufzählungstyp. (Mo,Di,Mi,Do,Fr,Sa,So) ist ein 
solcher Aufzählungstyp für die Wochentage wie auch (6800,6830, 
6900,6907) für einige Postleitzahlbezirke. 


Eine weitere Möglichkeit bietet sich dem Benutzer dadurch, daß 
er einen Datentyp als Unterbereich z.B. eines vordefinierten 
Datentyps definiert - einen Unterbereichstyp. 
Drei Beispiele: 0..7 umfaßt als Unterbereichstyp des Datentyps 
INTEGER die 8 Ganzzahlen 0,1,2,...,7. 

"A".."Z" umfaßt als Unterbereich des Datentyps CHAR alle Groß- 
buchstaben. 

Di..Fr umfaßt als Unterbereichstyp des obigen Aufzählungstyps 
vier Werktage. Angegeben wird also stets das kleinste und das 
größte Element des gewünschten Unterbereiches. 


Neben den Aufzählungs- und Unterbereichstypen zählen auch die 
Zeigertypen zur Kategorie der benutzerdefinierten Datentypen. 


1.3.2.5 Datentypen bei den verschiedenen Programmiersprachen 


Es hängt vom jeweiligen Programmier-System ab, mit welchen Da- 
tentypen Sie arbeiten können. 

Unstrukturierte Programmiersprachen wie BASIC lassen den Pro- 
grammierer weitgehend allein bei der Bildung von Datenstruktu- 
ren, oder anders: sie unterstützen ihn kaum. Bei BASIC fehlen 
der Verbund bzw. Record (was gerade bei der Dateiverarbeitung 
von Nachteil ist) wie auch die benutzerdefinierten Typen. 
Strukturierte Programmiersprachen stellen die oben angeführten 
Datentypen bereit. Aber auch hier gibt es Unterschiede. So ist 
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PASCAL -was die standardmäßige Vorgabe von Datentypen angeht- 
eher sparsam, aber die wenigen Datentypen können sehr flexibel 
zum Entwurf komplexer Datenstrukturen genutzt werden. Sprachen 
wie ADA und auch MODULA 2 sind weniger sparsam ausgestattet. 


1.3.3 Programmstrukturen 


Die vier Programmstrukturen Folge, Auswahl, Wiederholung und 
Unterprogramm sind die grundlegenden Ablaufarten der Informa- 
tik überhaupt. Grundlegend in zweifacher Hinsicht: 

Zum einen gelangt man beim Auseinandernehmen noch so umfang- 
reicher Programmabläufe immer auf die vier Programmstrukturen 
als Grundmuster ( Ana | y s e von Programmen). 

Zum anderen kann umgekehrt jeder zur Problemlösung erforderli- 
che Programmablauf durch geeignetes Anordnen dieser vier Pro- 
grammstrukturen konstruiert werden ( Synthese von Pro- 
grammen). 


1.3.3.1 Folgestrukturen 


Jedes Programm besteht aus einer Aneinanderreihung von Anwei- 
sungen an den Computer (vgl. Abschnitt 1.1.1). Besteht ein be- 
stimmtes Programm nur aus einer Folgestruktur, 
dann wird Anweisung für Anweisung wie eine Linie abgearbeitet. 
Man spricht deshalb auch vom linearen Ablauf bzw. unverzweig- 
ten Ablauf, vom Geradeaus-Ablauf oder von einer Sequenz. Das 
Beispiel zeigt ein Programm, bei dem 5 Anweisungen in Folge 
ausgeführt werden: Über Tastatur wird ein Rechnungsbetrag ein- 
gegeben, um nach der Berechnung den Skonto- und Überweisungs- 
trag als Ergebnis am Bildschirm auszugeben. Das Ablaufbeispiel 
wird als Entwurf, als Dialogprotokoll sowie als Struktogramm 
dargestellt. 


Erst Anweisung 1 ausführen, dann Anweisung 2, dann „.. 
Beispiel in Entwurfsprache: Allg. Ablauf in Entwurfsprache: 
Ausgabe Fragestellung 

Eingabe RECHNUNGSBETRAG 

berechne SKONTOBETRAG 

berechne UEBERWEISUNGSBETRAG 

Ausgabe der Ergebnisse 





Beispiel als Dialogprotokoll: Allg. Ablauf als Struktogramm: 







RUN a 
RECHNUNGSBETRAG =? | Anweisung 1 _| 
200 
SKONTOABZUG: 6 DM Pe 


UEBERWEISUNG: 194 DM 


Ablauf mit einer Folgestruktur 
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Um unabhängig von den Formalitäten der vielen Programmierspra- 
chen Programmabläufe beschreiben zu können, verwenden wir eine 
einfache Entwurfsprache (auch algorithmischer 
Entwurf oder Pseudocode genannt), die umgangssprachlich formu- 
liert wird. Im Beispiel werden die umgangssprachlichen Anwei- 


sungsworte 'Ausgabe', "'Eingabe' und "berechne' verwendet. Die 
Beschreibung von Abläufen mittels einer Entwurfsprache ist in 
der Informatik weit verbreitet. 

Dass Dialogprotokoll zum Ablaufbeispiel gibt 


den 'Dialog' zwischen Benutzer (der Werte eintippt) und Compu- 
ter (der Information ausgibt) wieder, wie er bei der Programm- 
ausführung am Bildschirm erscheint bzw. protokolliert wird. Im 
Beispiel gibt der Benutzer den Befehl RUN ein, worauf der Com- 
puter mit der Ausgabe RECHNUNGSBETRAG =? antwortet; nach der 
Benutzereingabe von 200 rechnet der Computer (im Dialogproto- 
koll nicht sichtbar) mit 3%, um dann Skonto- und Überweisungs- 
betrag in zwei Ausgabezeilen am Bildschirm anzuzeigen. 

Neben dem Entwurf und dem Dialogprotokoll ist das Programmbei- 
spiel zeichnerisch als Struktogramm dargestellt. 


1.3.3.2 Auswahlstrukturen 


Die Auswahlstrukt uren dienen dazu, aus einer 
Vielzahl von Möglichkeiten bestimmte Fälle auszuwählen: hier 
sind es die beiden Fälle 'Skontoabzug bei Bezahlung in weniger 
als 8 Tagen nach Rechnungserhalt (Bedingung TAGE<8 erfüllt) ' 
sowie "Zahlung rein netto bei späterer Überweisung (Begingung 
TAGE<8 nicht erfüllt)'. Dieses Beispiel bezeichnet man deshalb 
auch als Zweiseitioge Auswahl. 


Wenn Bedingung 1 erfüllt ist, dann führe Anweisung 2 aus, 
sonst führe Anweisung 3 aus, um dann gemeinsam fortzufahren. 


Beispiel in Entwurfsprache: Allg. Ablauf in Entwurfsprache: 








Ausgabe der Fragestellung 
wenn TAGE<38 
dann überweise mit Skonto 
sonst überweise rein netto 
Ende-wenn 





2 Bsp. als Dialogprotckoll: 
RUN 

ANZAHL DER TAGE =? 

6 

SKONTOABZUG MÖGLICH 

RUN 

ANZAHL DER TAGE =? 

14 


ZAHLUNG REIN NETTO 


Ablauf mit einer 


Anweisung 1 
wenn Bedingung 1 erfüllt 
dann Anweisung 2 
sonst Anweisung 3 
Ende-wenn 


Allg. Ablauf als Struktogramm: 


Anweisung |] 


Bedingung 
erfüllt? — 


Anweisung 2 
Fall: netto 


Anweisung 3 | 
Fall: Skonto| 





Auswahlstruktur 
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Daneben gibt es die Einseitige Auswahl mit 
nur einem Fall und die Mehrseitige Auswahl 
bzw. Fallabfrage mit mehr als zwei Fällen. 

Auswahlstrukturen werden auch als Alternativstrukturen, Abläu- 
fe mit (Vorwärts-)Verzweigungen bzw. als Selektion bezeichnet. 


1.3.3.3 Wiederholungsstrukturen 


Wiederholungsstrukturen führen zu Pro- 
grammschleifen, die mehrmals durchlaufen werden. Im Beispiel 
wird die Anweisungsfolge 'Eingabe', '"berechne', 'berechne' und 
'Ausgabe' wiederholt durchlaufen, bis die Bedingung RECHNUNGS- 
BETRAG = 0 erfüllt ist, die über Tastatur als Signal zum Been- 


Wiederhole die Anweisungen 1,2,3,... immer wieder, bis eine 
bestimmte Bedingung zum Beenden der Schleife erfüllt ist. 





Beispiel in Entwurfsprache: Allg. Ablauf in Entwurfsprache: 
Ausgabe Überschrifttext Anweisung 0 
wiederhole wiederhole 
Eingabe RECHNUNGSBETRAG Anweisung 1 
wenn BETRAG=0 dann Ende Anweisung 2 
berechne Skontobetrag van 
berechne UÜBERWEISUNGSBETRAG Anweisung n 
Ausgabe Ergebnis wenn Bedingung dann Ende 
Ende-wiederhole Anweisung n+1 
Ausgabe Hinweis Programmende Anweisung n+2 
Beispiel als Dialogprotokoll: Ende-wiederhole 
RUN 
PROGRAMM MIT SCHLEIFE Allg. Ablauf als Struktogramm: 


RECHNUNGSBETRAG =? 
100 Anweisungl(en) 


UEBERWEISUNGSBETRAG: 97 DM 
RECHNUNGSBETRAG =? Anweisungl(en) 
- Ende-Bedingung 






200 
UEBERWEISUNGSBETRAG: 194 DM 






RECHNUNGSBETRAG =? 
0 | Anweisung(en) 
PROGRAMMENDE | | SE 





Ablauf mit einer Wiederholungsstruktur 


den der Schleife eingetippt wird. Wiederholungsstrukturen wer- 
den auch als Repetitionen und Iterationen bezeichnet. Auf die 
verschiedenen Schleifentypen wie 

- abweisende und nicht-abweisende Schleife 

- Zählerschleife 

- offene und geschlossene Schleife 
gehen wir in Abschnitt 3.1.3 an Beispielen ausführlicher ein. 
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1.3.3.4 Unterprogrammstrukturen 


Unterprogrammstrukturen bieten sich im- 
mer dann an, wenn eine Aufgabe während eines Programmablaufes 
mehrmals benötigt wird, so z.B. die im Beispiel wiedergegebene 
Aufgabe "Runde kaufmännisch auf zwei Dezimälstellen'. Auch zur 


Führe Anweisungen Al aus, unterbreche Tätigkeit A, um Anwei- 
sungen B auszuführen, kehre zurück und fahre mit der Ausführ- 
ung der Anweisungen A2 fort (A im Haupt-, B im Unterprogramnm). 


Beispiel in Entwurfsprache: 


Eingabe RECHNUNGSBETRAG 
berechne SKONTOBETRAG 

Aufruf Unterprogramm RUNDEN —— runde BETRAG auf 2stellig 
berechne UEBERWEISUNGSBETRAG ersetze BETRAG durch den 
Ausgabe Ergebnis gerundeten BETRAG 





rufendes (Haupt-)Programm aufgerufenes Unterprogramm 


Ablauf mit Unterprogrammstruktur 


übersichtlichen Gliederung eines komplexen Programmes und zur 
Programmentwicklung im Team (jeder Mitarbeiter entwickelt ei- 
nen Teil des Programmes) werden Unterprogramme verwendet. 

Auf die möglichen Unterprogrammarten wie Prozeduren und Funk- 
tionen gehen wir in Abschnitt 3.1.4 konkret an Beispielen ein. 


1.3.3.5 Mehrere Strukturen in einem Programm 


Die meisten Programme umfassen natürlich mehrere dieser Struk- 
turen. Dabei sind zwei Anordnungsprinzipien zu unterscheiden. 
Programmstrukturen können entweder hintereinander oder aber 
geschachtelt angeordnet sein. 
- Anordnun hintereinander: 
Mit der jeweils folgenden Struktur wird erst dann begonnen, 
nachdem die gerade in Ausfühung befindliche Struktur beendet 
wurde. 
- AnordnunJ gGgeschachtelt: 
Mit der äußeren Struktur kann erst fortgefahren werden,nach- 
dem die innere Struktur vollständig ausgeführt wurde. Teil- 
weises Einschachteln bzw. Überlappen von Programmstrukturen 
ist folglich nicht erlaubt. 


1.3.4 Datenstrukturen und Programmstrukturen als Software-Bausteine 


In den beiden vorangegangenen Abschnitten haben wir die wesent- 
lichen Datenstrukturen ( wa s wird verarbeitet?) sowie Pro- 
grammstrukturen ( w i e ist zu verarbeiten?) allgemein darge- 
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stellt. Diese Strukturen mit ihren unterschiedlichen Ausprä- 
gungen können als Software - Bausteine auf- 
gefaßt werde, da aus ihnen bausteinartig die zur Lösung eines 
Problems erforderlichen Abläufe gebildet werden. 


Datenstrukturen 


| einfach: strukturiert: 
CHAR, Zeichen ARRAY (Feld, Bereich) 
INTEGER, Ganzzahl RECORD, Verbund 

REAL, Dezimalzahl SET, Menge 

STRING, Text FILE, Datei 


|BOOLEAN, Logisch benutzerdefinierte Daten | 





Folge: Wiederholung: 

linearer Ablauf nicht-abweisend, 
abweisend, Zählerschleif 

Auswahl: 


einseitig, zweiseitig, Unterprogramm: 
mehrseitig (Fallabfrage) Bee Funktion 


Programmstrukturen 





Daten- und Programmstrukturen als Software-Bausteine 


Wie werden Daten(-strukturen) im Hauptspeicher abgelegt und 
verarbeitet? Wie werden Programm(-strukturen) abgespeichert? 
Wie sind Programme aufgebaut? Zu diesen Fragen kommen wir nun. 


1.3.4.1 Modell des Hauptspeichers RAM als Regalschrank 


In dem als Speicher RAM ausgebildeten Hauptspeicher befinden 
sich die zur Verarbeitung benötigten Daten und Programme. Den 
RAM können wir uns als Regalschrank mit sehr vielen Speicher- 
stellen vorstellen, in die je ein Zeichen abgelegt werden kann. 
Ein RAM mit 64 KB (vgl. Abschnitt 1.2.3.4) umfaßt genau 65536 
solcher Speicherstellen (64 * 1024), die von 0 an fortlaufend 
durchnumeriert sind, wobei die Nummern 0,1,2, ... ‚65535 die 
tatsächlichen Ad re s sen der Speicherstellen darstellen. 


Soll ein Rechnungsbetrag über 200.50 DM von Adresse 2210 oder 
von Adresse 58934 an gespeichert werden? Um diese tatsächli- 
chen Adressen müssen wir uns zumeist nicht kümmern. Wie allen 
Daten geben wir dem Rechnungsbetrag einen Namen, z.B. BETRAG, 
der dann als symbolische Adresse zur Spei- 
cherung dient. Der Computer sucht sich selbständig einen für 
BETRAG freien Speicherplatz und legt die 200.50 dorthin ab. 
Wo soll das zugehörige Programm abgespeichert werden? Auch da- 
rum brauchen wir uns nicht zu kümmern. Wir geben dem Programm 
einen Namen wie z.B. RECHNUNG! „ und der Computer reserviert 
selbständig die notwendige Anzahl von Speicherstellen und be- 
stimmt dann einen geeigneten Speicherort. 

Daten wie Programme werden also über ihre Namen angesprochen. 
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Wieder zum Modell des RAM als Regalschrank: 

Einige Regale sind leer. In ihnen ist nichts gespeichert. Auf 
anderen Regalen aber befinden sich Schachteln, und zwar Daten- 
Schachteln mit Daten als Inhalt sowie Programm-Schachteln mit 
Anweisungen als Inhalt. Jede Schachtel ist mit dem von uns je- 
weils gewählten Namen beschriftet.urch Angabe dieser Namen ist 
es uns möglich, Inhalte von Schachteln zu lesen und zu ändern. 
Für die ausreichende Größe einer Schachtel (=-Anzahl von Spei- 
cherstellen) sowie das passende Regal (=tatsächliche Adresse) 
sorgt der Computer selbst. 


1.3.4.2 Daten als Variablen und Konstanten 


Daten sprechen wir mit Namen an. Dies gilt für veränder- 
liche bzw. variable Daten, für Variablen, wie auch 
für feste bzw. konstante Daten, also für Konstanten. 


Das Einrichten von Daten-Schachteln bezeichnet man als Dekla- 
ration oder als Vereinbarung . Für eine Variable 
müssen wir vereinbaren, welchen Namen (z.B. den Namen BETRAG) 
und welchen Datentyp (z.B. Dezimalzahl bzw. REAL) sie haben 
soll. Mit dem Datentyp wird der Werteberewich an- 
gegeben. Den Inhalt als den Wer t der Variablen können wir 
dann später im Rahmen des jeweiligen Wertebereichs (z.B. der 


BETRAG -— —_-.._ _ _ ABETRAG / 200.50 


als Name — — "als derzeitiger 
Wert bzw. Inhalt 
Dezimalzahl _—-—- 
als Datentyp 





Vereinbarung in Entwurfsprache: Variable namens BETRAG vom 
nn bei nn en rn En A Datentyp '"Dezimalzahl' zur 
BETRAG: Dezimalzahl bzw. REAL späteren Aufnahme von de- 

Te I zimaligen Werten vereinbart 


Name, Datentyp und Wert kennzeichnen eine Variable 


Dezimalzahlen) beliebig verändern. Jede Variable weist somit 
die drei Komponenten Name, Datentyp (=Wertebereich) und Inhalt 
bzw. Wert (= augenblicklicher Schachtelinhalt) auf. Schachteln 
können sehr klein (wie die für den BETRAG) oder auch sehr unm- 
fangreich (wie z.B. ein String-Array mit 100 Zeilen und mit 5 
Spalten für 100%5=500 Artikelmengen) sein. 


Für eine Konstant e müssen wir einen Namen vereinba- 
ren (z.B. den Namen SI für den Skontosatz) und einen konstan- 
ten Wert (z.B. 3 $%). 


Die Vereinbarungen von Variablen und von Konstanten werden vom 
Programmierer im Rahmen der Programmerstellung getroffen; sie 
stehen am Anfang: der Computer muß eine Daten-Schachtel zu- 
erst einrichten, um dann mit ihr gemäß den im Programm weiter 
angegebenen Anweisungen arbeiten zu können. 
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3 als 
= "konstanter Wert 





Vereinbarung in Entwurfsprache: In Konstante namens SI] 
ze wird die Zahl 3 fest ge- 
SI = 3 speichert als %-Satz 


Name und fester Wert kennzeichnen eine Konstante 


1.3.4.3 Programm mit Vereinbarungsteil und Anweisungsteil 


Jedes Programm weist neben dem Programmnamen zwei weitere Be- 
standteile auf: den Vereinbarungsteil und den Anweisungsteil. 


Der Programmname dient zum Aufrufen des Programms im RAM als 
dem Internen Speicher wie auch auf Diskette bzw. Kassette als 
Externen Speichereinheiten. 

Im Vereinbarungst ei | legt der Programmierer 
fest, welche Variablen und Konstanten einzurichten sind. In 
Abschnitt 3 werden wir sehen, daß ggf. auch selbstdefinierte 
Datentypen sowie Unterprogramme (Prozeduren und Funktionen) 
vereinbart werden können. 

In den Programmiersprachen wird unterschiedlich vereinbart. So 
muß in PASCAL der Vereinbarungsteil in jedem Fall programmiert 
werden. In BASIC können Vereinbarungen auch durch die Wahl der 
Variablen getroffen werden. 


Broaranm Sauer, I. Programmname 


Vereinbarungsteil 2. Vereinbarungsteil: 
von Konstanten ---- - - - - - - - - - - -- - 
von selbstdefinierten Typen Bedeutung aller Namen 
von Variablen festlegen 
von Funktionen (was wird später 
von Prozeduren verarbeitet?) 


Anweisungsteil 3, Anweisungsteil: 
zur Eingabe 0.0000. |. =... ----- - 
zur Ausgabe (z.B. Drucker) | Anweisungen festlegen 
zur Wertzuweisung (wire ist Zu 
zur Ablaufsteuerung (z.B. - verarbeiten?) 





Name, Vereinbarungsteil und Anweisungsteil als Bestandteile 
eines jeden Programms 


Der Anweisungsteil als Folge von Anweisungen 
an der Computer enthält das eigentliche Programm. Auf die ein- 
zelnen Anweisungsarten zur Eingabe, Ausgabe, Wertzuweisung und 
Ablaufsteuerung gehen wir in Abschnitt 3.1 an Beispielen ein. 
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1.3.5 Datei und Datenbank 


Eine Datei stellt die typische Datenstruktur zur langfristigen 
Speicherung von Massendaten in der kommerziellen DV dar. Am 
Beispiel der in Abschnitt 1.3.2.2 bereits angesprochenen Kun- 
dendatei wollen wir auf die Dateiverarbeitung 
eingehen (man spricht dabei auch von Dateiverwaltung oder von 
File Handling (File für Datei)). 

Diese Kundendatei ist bewußt sehr einfach aufgebaut: 

Zu jedem der derzeit 1580 Kunden einer Handelsfirma werden die 
drei Angaben NUMMER, NAME und UMSATZ als Kundendatei auf einem 
Externspeicher abgelegt. Man sagt auch: Die Kundendatei umfaßt 
derzeit 1580 Datensätze (Kundensätze bzw. Sätze), wobei jeder 
Satz aus drei Datenfeldern als Komponenten besteht. Für diese 
Felder wiederum sind Variablen mit unterschiedlichen Datenty- 
pen vereinbart: eine Variable namens NUMMER für die Kundennum- 
mer ganzzahlig, eine Variable NAME als Text und eine Variable 
UMSATZ für den getätigten DM-Umsatz vom Datentyp Dezimalzahl. 
Die Datensätze stellen jeweils Verbunde (Records) dar. Der Da- 


4 Datensätze ausgedruckt: Datensatz als Verbund vereinbart: 
(1) 101 FREI 6500.00 KUNDSATZ: Verbund bzw. Record 
(2) 104 MAUCHER 295.60 NUMMER: Ganzzahl 
(3) 109 HILDEBRANDT 4590.05 NAME: Text 

(4) 110 AMANN 1018.75 UMSATZ: Dezimalzahl 


. u. 5 = u = .:=.. .a== Ende-Verbund 
Vereinbarung der Datei: 
A BEE BB u ee 


KUNDDATEI: Datei (File) mit Datensätzen vom Typ KUNDSATZ 


Vereinbarung und Inhalt der KUNDDATEI 


tensatz hat den Namen KUNDSATZ und die Datei heißt KUNDDATEI. 
Wie die obigen 4 Sätze zeigen, sollen die Kunden nach Kunden- 
nummern aufsteigend sortiert gespeichert sein. Mit (1),(2),... 
werden die Datensatznummern innerhalb der Datei angegeben. 


Eine Datei umfaßt mehrere Datensätze. Jeder Satz hat mehrere 
Datenfelder. Jedes Feld besteht aus mehreren Zeichen und jedes 
Zeichen wird als Byte als Kombination von 8 Bits gespeichert. 


Datei (File) .„.„. namens KUNDDATEI mit 
derzeit 1580 Datensätzen. 

Datensatz (Record) .„.„. mit drei Datenfeldern 
NUMMER, NAME und UMSATZ. 

Datenfeld (Field) -.. NAME mit 11 Zeichen 
maximal. 


Zeichen, Byte (Character) ... "R" als zweites Zeichen 
von "FREI". 

Bit (0 oder 1) „.. 0 als 1. Bit im Byte 
01010010 für "R". 


Aufbau einer Datei: Datei-Satz-Feld-Zeichen-Bit 


1.3 Software = Daten + Programme 37 


1.3.5.1 Zugriffsart, Speicherungsform und Verarbeitungsweise 


Auf eine Datei wird stets datensatzweise zugegriffen, sei es 
in den RAM hin e in (Lesen = E i n gabe) oder aus dem RAM 
hin a us (Schreiben = A u s gabe). Entsprechend spricht man 
vom lesenden Zugriff (vom Externspeicher in den RAM) oder vom 
schreibenden Zugriff (vom RAM auf den Externspeicher). Ist oh- 
ne weiteren Zusatz vom Zug ri f f die Rede, so meint man 
damit das Lesen von Sätzen. Zwei zugriffsarten 
sind zu unterscheiden: der direkte und der indirekte Zugriff. 


Der direkte zug ri f £f läßt sich mit der Schall- 
platte vergleichen: Will man z.B. das 7. Musikstück hören,kann 
der Tonarm direkt bei diesem gewünschten Stück aufgesetzt wer- 
den. Entsprechend kann bei der Platte (Magnetplatte, Diskette) 
in der DV ein bestimmter Datensatz direkt durch Angabe seiner 
Datensatznummer als Adresse bzw. 'Hausnummer' in den RAM gele- 
sen werden. 

Der indirekte zug ri f f ist -wie beim Tonband- 
umständlicher: das Tonband muß z.B. zum 7. Musikstück gespult 
werden; wir können nur in der Reihenfolge zugreifen, in der 
früher einmal aufgenommen wurde. Dementsprechend muß in der DV 
Datensatz für Datensatz gelesen werden, bis z.B. der 7. Kunde 
gefunden ist. 

wir halten fest: Beim Band (Magnetband, Kassette) kann nur in- 
direkt auf den Datensatz einer Datei zugegriffen werden, wäh- 
rend bei der Platte (Magnetplatte, Winchesterplatte, Diskette) 
auch direkt zugegriffen werden kann. Die Platte wird deshalb 
auch Direktzugriff - Speicher genannt, 
im Gegensatz zum Band als sequent ie 1 1 em Speicher 
(Sequenz = Reihenfolge). 





ZUGRIFFSARTEN: 
| indirekt, direkt 
nn U 
Hauptspeicher Externer 
RAM Speicher 
ee Diskette, 
SPEICHERUNGSFORMEN: | Hard Disk, 
seriell, | Kassette, 
VERARBEITUNGSWEISEN: gestreut, ... 
sortiert, indiziert, 
unsortiert verkettet 





Zugriff, Speicherung und Verarbeitung der Datei 


Der Begriff der SpeicherungsfoRrm bezieht sich 
auf das Abspeichern bzw. Schreiben von Sätzen aus dem RAM auf 
die Datei. 

Sseriell speichern heißt starr fortlaufend speichern: 
der nächste Neu-Kunde wird als nächster Kunde hinter den zuvor 
gerade geschriebenen Datensatz gespeichert. 

Ges t re ut speichern heißt, daß die Sätze zufällig über 
die Plattenoberfläche hinweg streuend abgelegt werden. Zur Er- 
klärung folgendes Beispiel: In einem Betrieb seien die Kunden- 
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nummern 101,104,109,110,...,50000 vergeben. Würde man nach dem 
Verfahren "Kundennummer ergibt Datensatznummer" vorgehen, so 
würde man auf der Platte 50000 Speicherorte für die nur 1580 
Kundensätze zu reservieren haben - wahrlich verschwenderisch. 
Was tun? Man versucht, die Anzahl der Speicherorte durch die 
Wahl eines geeigneten Adreßrechungsverfahrens zu verdichten wie 
z.B. mit dem Divisions-Rest-Verfahren. Das führt dann dazu,daß 
Kunde 48236 als 237. Satz und Kunde 3973 als 1831. Satz abge- 
legt ist, daß also gestreut gespeichert ist. Der Nachteil sol- 
cher Verfahren: Für mehrere Kundennummern kann sich ein und 
dieselbe Datensatznummer ergeben. 


Nach der seriellen Speicherung und der gestreuten Speicherung 
nun zur indiziert en Speicherung als dritter Form. 
Zur Erklärung folgendes Beispiel: Zusätzlich zu unserer Kun- 
dendatei wird in einer Indexdeat e i zu jedem Namen 
die Datensatznummer gespeichert, unter der dieser Name in der 
Kundendatei zu finden ist: Kunde MAUCHER so z.B. als 2. Satz. 
Wie die Kundendatei (zur Unterscheidung Haupt- oder Datendatei 
genannt) 4 Kundensätze hat, so hat auch die Indexdatei 4 In- 
dexsätze. Dann wird diese Indexdatei nach Namen sortiert abge- 
speichert. Möchte man sich nun später alle Kunden nach Namen 
sortiert ausdrucken lassen ‚geht man wie folgt vor: 

1. Indirekter Zugriff auf den jeweils nächsten Indexsatz der 

sortierten Indexdatei. 

2. Direkter Zugriff auf den Kundensatz, dessen Datensatznum- 

mer gerade zuvor aus der Indexdatei gelesen wurde. 

3. Mit 1. fortfahren, bis Ende der Indexdatei erreicht ist. 
Eine lIndexdatei kann als Inhaltsverzeichnis aufgefaßt werden, 
das - ähnlich den Seitenangaben in einem Buchinhaltsverzeich- 
nis - die Satznummern der zugehörigen Datendatei anzeigt (in- 
dizieren bedeutet anzeigen). Zu unserer Kundendatei sind zu- 
mindest drei Indexdateien möglich: je eine für die NUMMER, für 
den NAMEn und für den UMSATZ. 


Kundendatei mit den Indexdatei fur Indexdatei für 
ersten 4 Datensätzen: NAME unsortiert: NAME sortiert: 
[ Amann 

FREI 


[FREI 
| MAUCHER 


101 FREI 6500.00 
104 MAUCHER 295.60]| 


109 HILDEBRANDT 4590.05| 


1 
2 
| HILDEBRANDT 3 HILDEBRANDT 
110 AMANN 1018,75] 4 


AMANN 





R _MAUCHER _ 
Hauptdatei mit hier 3 Indexdateien mit stets 2 Datenfeldern: 
Datenfeldern NUMMER, NAME als Schlüsselfeld und SATZNUMMER 
NAME und UMSATZ. (der Hauptdatei) als Adreßfeld. 


Kundendatei als Datendatei mit zwei Indexdateien 


Das Anlegen einer Indexdatei gestattet einen schnellen Zugriff 
sowie vielseitige Verarbeitungsarten. 

Zunächst zur Geschwindigkeit: In der kaufmännischen Praxis ist 
ein Kundensatz mit z.B. 300 Zeichen viel länger als unser Bei- 
spielsatz, der Indexsatz hingegen unverändert kurz, da er ja 
nur die beiden Komponenten NAME als Schlüsselfeld und SATZNR 
als Adreßfeld umfaßt. Das Durchsuchen oder Sortieren einer In- 
dexdatei geht somit schneller vonstatten als das der zugehöri- 
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den Datendatei. Zumal die Indexdatei aufgrund ihres geringen 
Umfanges dabei komplett im Hauptspeicher gehalten werden kann, 
während die Datendatei aufgrund ihrer Größe zum Sortieren wie- 
derholt ein- und ausgelagert werden muß. 

Ein zweiter Vorteil besteht in der Vielseitigkeit: Hat man zu 
den Schlüsseln NAME, UMSATZ, PLZ, WOHNORT, VERTRETER, RABATT, 
KUNDESEIT, OFFENERPOSTEN je eine Indexdatei sortiert angelegt, 
so können die Kunden iederzeit nach diesen 8 Ordnungsbegriffen 
sortiert in einer Übersicht ausgedruckt werden. Ebenso kann 
e i n bestimmter Kunde über schnelle Suchverfahren wie etwa 
über das 'binäre Suchen' am Bildschirm angezeigt werden. 


Als vierte Speicherungsform wurde oben dieverkettete 
Speicherung genannt. Dazu folgendes Beispiel: Der Kundensatz 
wird um 2 Datenfelder erweitert, in denen Zeiger bzw. Pointer 
gespeichert sind, die auf den jeweils nächsten Kundensatz zei- 


Kunden- Kunden- Kunden- Zeiger Zeiger 
nummer: name: umsatz: für Name: für Umsatz: 


FREI 6500.00 
MAUCHER 295.60 


HILDEBRANDT 4590.05 
AMNN A 1018.75 


— 





Kundendatei mit Verkettung über zwei Zeigerfelder 


gen. Das erste Zeigerfeld verkettet die Sätze nach Namen auf- 
steigend sortiert: Nach dem Lesen von AMANN (A für Ankeradres- 
se) verweist Zeigerfeldinhalt 1 auf FREI, der dann eingelesen 
wird; dann zeigt Zeiger 3 auf HILDEBRANDT als 3. Satz, worauf 
mit Zeiger 2 auf MAUCHER zugegriffen wird, dessen Zeiger 0 das 
Ende der Kette signalisiert. Über diese Kette 3-0-2-1 können 
die Kunden rasch alphabetisch geordnet aufgelistet werden. Die 
zweite Kette 0-4-1-3 verkettet Kunden nach deren Umsatz geord- 
net. 

Das Beispiel zeigt, daß über die verkettete Speicherung belie- 
big viele log is ch e Ordnungen gebildet werden können, 
ohne die Datensätze dazu ph y s is ch auf dem Externspei- 
cher umspeichern zu müssen. 


Nach den zwei Zugriffsarten und den vier Speicherungsformen 
nun zu den zwei Verarbeitungsweisen, zur 
sortierten und Zur unsortierten Verarbeitung: 

Eine Datei sortiert verarbeiten heißt, daß eine phy- 
sisch oder logisch zusammenhängende Folge von Datensätzen ver- 
arbeitet wird wie z.B. beim Auflisten des gesamten Dateiinhal- 
tes oder bei der Gehaltsabrechnung für alle Angestellten eines 
Betriebs. Wenn die Bewegungsdatei (Lagerzugänge und -abgänge) 
genauso sortiert vorliegt wie die Bestandsdatei (Artikel ins- 
gesamt), wird von einer sortierten Verarbeitung gesprochen. 

Bei der unsort ie rt en Verarbeitung werden einzelne 
Sätze einer Datei ggf. mehrmals direkt angesprochen wie z.B. 
beim Verarbeiten einzelner Kundenaufträge oder beim Auskunfts- 
erteilen über den derzeitigen Kontostand. 
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1.3.5.2 Vier Organisationsformen von Dateien 


Je nach Kombination von Zugriffsart (Eingabe eines Datensatzes 
vom Externspeicher in den Hauptspeicher RAM), Speicherungsform 
(Ausgabe vom RAM auf den Externspeicher) und Verarbeitungswei- 
se (Verarbeitung intern im Hauptspeicher) kann eine Vielzahl 
von Datei - Organisationsformen unterschieden werden. Folgende 
vier Organisationsformen werden heute am 
häufigsten genannt - wenn auch kaum einheitlich ausgelegt. 


Ssegqguentielle batei: 

Indirekter Zugriff, serielle Speicherung und sortierte 
Verarbeitung bei (zumeist) sortierter Speicherungsfolge. 
Typische Band-Datei (Magnetband, Kassette). 


Direktzugriff - Datei: 

Direkter Zugriff, oft gestreute Speicherung und unsortierte 
wie ggf. sortierte Verarbeitung, 

Typische Platten-Datei (Magnetplatte, Diskette). 
Bezeichnungen: Random-Datei, Relative Datei. 


Inne % - 5 e qWerın te’ TI 8 DialE'erii: 
Kombination von sequentieller und Direktzugriff-Datei. 
Alle Zugriffsarten, Speicherungsformen und Verarbeitungs- 
weisen; kennzeichnend ist die indizierte Speicherung. 


vVerkettete Diäitei: 
Indirekter Zugriff, verkettete Speicherung und sortierte 
Verarbeitung. 


Vier Organisationsformen von Dateien 


Die rein sequentiell organisierte Datei wird mit der zunehmen- 
den Verbreitung von Wechselplatte, Festplatte und Diskette im- 
mer mehr durch die Direktzugriff-Datei und die index-sequenti- 
elle Datei verdrängt. 


1.3.5.3 Grundlegende Abläufe auf Dateien 


Die Dateiverarbeitung umfaßt viele Abläufe: So müssen Daten 
zunächst einmal erfaßt bzw. computerlesbar gemacht werden, um 
sie dann auf einem Externspeicher abzulegen, später wieder zu 
suchen, abzuändern, auszudrucken, zu löschen usw. Zusammenfas- 
send können wir hierzu 11 grundlegende Abläufe zum Einrichten, 
Verwalten und Auswerten von Dateien unterscheiden. Jedes kom- 
merzielle Datei-System mit dem Anspruch auf eine universelle 
Verwendbarkeit wird diese Abläufe bereitstellen. 


In Abschnitt 1.3.1.1 wurden Bestands- und Bewegungsdaten sowie 
Stamm- und Änderungsdaten unterschieden. Entsprechend gibt es 
dem Inhalt nach vier Dateiarten: die Bestandsdatei (z.B. Arti- 
kelbestandsdatei), die Bewegungsdatei (z.B. Zu-/Abgänge von 
Artikellagerbeständen), die Stammdatei (z.B. Kundenstammdatei) 
und die Änderungsdatei (z.B. Änschriftsänderung von Kunden). 
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1. Anlegen: 
Datei auf einem Externspeicher leer einrichten. 


2. Neu schreiben: | 
Datensätze erfassen und neu in die Datei hinzufügen. 


3. Lesen: 
Einen oder mehrere Datensätze in den Hauptspeicher 
lesen und am Bildschirm anzeigen oder am Drucker 
auflisten. 


4. Bewegen: 
Zu- und Abgänge mengenmäßig (Lagerbestandsfortschrei- 
bung) oder wertmäßig (Kontoführung) aktualisieren. 


55. Km Asa : 
Sätze löschen (entfernen) oder inhaltlich abändern. 


BEE be rien 
Sätze in auf- oder absteigende Sortierfolge bringen. 


I... Mo gB ehen; 
Dateien zu einer Datei sortiert zusammenfügen. 


8. Kopiere nz 
Datei abbildgetreu (Back-Up) oder verändert kopieren. 


9, Auswahlen: 
Sätze, die bestimmten Bedingungen genügen, heraussuchen 
bzw. selektieren. 


ı De ee a BR Va u 5 Be Br EEE al 
Datei nach bestimmten Größenklassen auswerten. 


115. ke 24 2.0 R £ ey 
Sätze nach Merkmalen gruppieren und Gruppensummen 
bilden (Gruppenwechsel). 


Grundlegende Abläufe (Algorithmen) auf Dateien 


Die elf grundlegenden Abläufe beziehen sich auf diese vier Da- 
teiarten gleichermaßen. Man spricht auch von den grundlegenden 
Datei - Algorithmen (ein Algorithmus ist eine 
Folge von Anweisungen, die in einer endlichen Schritt-Anzahl 
zur Lösung eines Problems führt). 

Zum Ablauf 'Bewegen': Bewegungen werden in der Regel gesammelt 
(gestapelt), als Bewegungsdatei gespeichert und dann z.B. zum 
Wochenende in einem Arbeitsgang verarbeitet. 

Zum Ablauf "'Ändern': Sätze können tatsächlich (=physisch) oder 
nur durch eine bestimmte Markierung wie BESTAND=-99 (=logisch) 
gelöscht werden; die Inhaltsänderung kann ein oder mehrere 
Datenfelder betreffen. 

Zum Ablauf "Sortieren': Es kann intern im RAM und/oder extern 
auf Band bzw. Platte sortiert werden. Dabei werden die Daten- 
sätze selbst oder aber nur deren Adressen (Speicherplätze) in 
eine neue Reihenfolge gebracht. 


42 1 Computer allgemein 


Zum Ablauf 'Kopieren': Beim Back-Up duplizieren wir eine Datei 
unverändert. Ebenso läßt sich eine Datei als Kopie von einer 
anderen Datei bei gleichzeitigem Ändern (Verkürzen, Erweitern 
Modifizieren) erstellen. 

Zum Ablauf "'Auswählen': Hat die Datei n Sätze, so kann man ge- 
nau einen Kunden (110), mehrere vorgegebene Sätze (Kunden 101, 
104 und 110) oder eine unbestimmte Satzanzahl (alle Kunden un- 
ter 10.000 DM Umsatz) auswählen. 

Zum Ablauf 'Klassifizieren': Hier wird z.B. eine Artikeldatei 
nach Lagerorten und Umschlagshäufigkeit tabellarisch ausgewer- 
tet. 

Zum Ablauf 'Verdichten': Gruppenwechsel kann einstufig (Absatz 
je Vertreter) oder zweistufig (Absatz je Vertreter u. Artikel) 
vorgenommen werden. 


1.3.5.4 Datei öffnen, verarbeiten und schließen 


Beim Lesen, Schreiben oder Ändern einer Datei geht man immer 
in drei Schritten vor: 


1. Dateiöffnen: 
Verbindung zwischen Datei und Programm herstellen 
(Dateiname, Zugriffsart, Verbindungskanal usw.). 

2. Datei verarbeiten: 
Lesen (eingeben), schreiben (ausgeben) und/oder 
ändern (ein-/ausgeben bzw. überschreiben). 

3. Dateiischließen: 
Verbindung ordnungsgemäß beenden 
(Dateiende EOF (End of File) kennzeichnen, Directory 
(Inhaltsverzeichnis) auf Datei rückübertragen). 


Bei komplexen Datei-Algorithmen sind für diese drei Schritte 
jeweils gesonderte Unterprogramme vorgesehen, die Programm- 
vorlauf, Programmtreiber und Programmabschluß genannt werden. 


Zum Schritt 2 eine Anmerkung: Ist eine Datei auf Kassette ab- 
gespeichert, liest man nach dem Eröffnen häufig die Datei in 
einem Arbeitsgang komp let t in den Hauptspeicher, um 
sie dort z.B. als Array (Feld, Bereich, Tabelle) verarbeiten 
zu können. Erst unmittelbar vor dem Schließen wird die aktua- 
lisierte Datei dann - wiederum komplett - auf die Kassette zu- 
rückgeschrieben. Man bezeichnet dies als dateiweisen Datenver- 
kehr. 

Ist die Datei größer als der im RAM intern verfügbare Spei- 
cherplatz, dann ist dieses Vorgehen nicht möglich. Als Gegen- 
stück kann man mit Schritt 2 je einen Datensatz einzeln 
in den RAM übertragen und umgekehrt (datensatzweiser Datenver- 
kehr). 

zwischen diesen beiden Extremen - Datenverkehr dateiweise oder 
datensatzweise - gibt es natürlich zahlreiche Abstufungen. 


1.3.5.5 Eine oder mehrere Dateien verarbeiten 


In der kaufmännischen Praxis wird man nur selten e ine Da- 
tei einzeln verarbeiten. Vielmehr sind zumeist mehrere 
Dateien in ein System eingebunden; man spricht dann häufig von 
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einer Dateiverketrtvurng. Dazu ein Beispiel: In 
einer Lagerverwaltung sind die 'Artikelstammdatei', 'Bestands- 
datei', 'Bestelldatei (Einkauf)' und "Auftragsdatei (Verkauf)' 
verkettet, um von einem Programm(-paket) verwaltet zu werden; 
Datenverwaltungs - System ist die oft 
verwendete Bezeichnung hierfür. 

Wird nicht nur die Aufgabe der Lagerverwaltung gelöst, sondern 
werden sämtliche betrieblichen Aufgaben in einem Datei-System 
eingebunden, dann spricht man oft von integrierter 
Datenverarbeitung. 


1.3.5.6 Datenbank 


Bei isolierter Verarbeitung einzelner Dateien wie auch bei der 
Dateiverkettung ist nicht zu vermeiden, daß ein Datum mehrfach 
in verschiedenen Dateien gespeichert ist; man spricht von der 
Datenredundanz . So kann z.B. ein Kunde samt Kun- 
denanschrift in der Kundenstammdatei, der Offene-Posten-Datei 
und der Weihnachtsgeschenkedatei dreifach gespeichert sein. Um 
dies zu vermeiden, faßt man sämtliche Daten in einer ge- 
meinsamen Datenbasis zusammen, die Datenbank genannt 
wird. Eine solche Datenbank kann - für sich alleine genommen - 
ebenfalls als Verkettung von Dateien angesehen werden. Daß we- 
sentlich neue dabei ist, daß auf alle Elemente der Datenbank 
über ein Datenbankmanagementsystenm 
(DBMS) zentral zugegriffen wird. Das DBMS besteht aus meh- 
reren Systemprogrammen zur Durchführung von Aufgaben wie dem 
Ändern von Daten der Datenbank, dem gleichzeitigen Zugriff 
mehrerer Benutzer, dem Abfragen von Daten, dem Überprüfen der 
zugriffsberechtigung usw.. 


Datenbank-System (DBS) 















Datenbank 
(DB) 


Datenbank- 
management - 
system (DBMS) 








Benutzer 






mit Dateien 
wie: 


mit Sprachen 
wie: 




















DDL, 
DML 


Artikelstamm, Gehalt, 
Kunden, Rechnung, 
Lager, Bestellungen 





Das Datenbank-System besteht aus Datenbank und DBMS 


Mit dem DBMS werden dem Benutzer unter anderem zwei sprachli- 
che Hilfsmittel zur Verfügung gestellt: 

zum einen die Daten-Definitions-Sprache DDL (Data Definition 
Language) zum Aufbau und zur Pflege der Datenbank. Mit der DDL 
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werden z.B. die Datensätze definiert (Name, Anzahl, Datentyp, 
Länge der Satzkomponenten). Sie richtet sich mehr an den Pro- 
grammierer bzw. an den Datenbankverwalter. 

Zum anderen eine Daten-Manipulations-Sprache DML (Data Manipu- 
lation Language) zur eigentlichen Behandlung der Daten. Diese 
DML richtet sich mehr an den Sachbearbeiter, der ein Abfrage 
wie "Drucke eine Übersicht aller Kunden aus, die offene Rech- 
nungen über DM 5000.- zu begleichen haben'laufen läßt. Die DML 
wird auch als Abfragesprache bzw. Query-Language bezeichnet. 
Datenbank-Sprachen weisen wie Programmiersprachen zumeist eng- 
lische Anweisungsworte auf wie etwa FIND zur Suchanfrage, READ 
zum Lesen, WRITE zum Schreiben, DELETE zum Entfernen, INSERT 
zum Einfügen von Datensätzen. 


Das herkömmliche Date i -Syst em unterscheidet sich 
in zumindest 3 Punkten vom Datenbank-Systenm: 


-Redundanzfreiheit: 
In der Datenbank werden die Daten möglichst redundanzfrei 
abgelegt, d.h. nicht mehrfach gespeichert. 
- Vielfache Verwendbarkeit: 
In der Datenbank werden die Daten vielfach verwendbar abge- 
legt, um vielen Benutzern einen möglichst einfachen Direkt- 
zugriff zu gestatten. 
-Datenunabhängigkeit: 
Die Programme bzw. Zugriffspfade arbeiten datenunabhängig in 
dem Sinne, daß bei der Änderung der Daten keine Änderung des 
Programms notwendig wird. 


Zwei grundlegende Datenbank-Systeme sind zu unterscheiden: das 
strukturierte und das unstrukturierte Datenbank-System. Struk- 
tieriert bedeutet, daß in der Datenbank selbst Information zum 
Verweisen auf weitere Information abgespeichert ist; damit muß 
bei Anfragen stets entlang der vorgegebenen Pfade vorgegangen 
werden. Im Gegensatz dazu gibt es bei der unstrukturierten Da- 
tenbank keine vordefinierten Zugriffspfade; damit verlangsamt 
sich der Zugriff, gleichzeitig jedoch hat man unbegrenzte Mög- 
lichkeiten, Daten nach bestimmten Suchkriterien abzufragen. 


Datenbank - System (DBS) 


STRUKTURIERT: UNSTRUKTURIERT: 


Suchbegriffe, Zugriffspfade Verknüpfung der Information 

festgelegt und gespeichert. erst im Moment der Abfrage. 

- Hierarchisches DBS: Daten - Invertierte Dateien: Zugriff 
baumartig verkettet.,. über Index-Listen. 

- Netzwerk-Modell (CODASYL): - Relationen-Modell: Anordnung 
Netz von Zugriffspfaden. der Daten in Tabellenform. 


Strukturiertes und unstrukturiertes Datenbank-System 


Beim Netzwerk-Modell gemäß dem CODASYL-Ausschuß (COnference of 
DAta SYstem Language in den USA im Jahre 1971) sind die in der 
Datenbank abgelegten Daten in Datentypen (Item Types) sowie in 
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Datensatztypen (Record Types) zu gliedern, wobei zwischen den 
verschiedenen Datensatz-Typen sogenannte Beziehungstypen (Set 
Types) definiert werden. 

Beider relationalen Datenbank als Ge- 
genstück zum Netzwerk-Modell werden nur Datensätze im herkömm- 
lichen Sinne unterschieden, wobei die einzelnen Datensatzkom- 
ponenten bzw. Datenfelder in Beziehung zueinander stehen wie 
die Zeilen und Spalten einer Matrix (Tabelle bzw. zweidimen- 
sionaler Array). Dazu als Beispiel unsere Kundendatei von Ab- 
schnitt 1.3.5: 


1017 FREI 6500.00 Matrix mit n Zeilen und 3 Spalten. 
104 MAUCHER 295.60 Jeder Zeile entspricht ein Daten- 
109 HILDEBRANDT 4590.05 satz, jeder Spalte ein Datenfeld. 
110 AMANN 1018.75 Zugriffsbeispiel: Matrix(2,3) er- 
oo... ... gibt 295.60 (2. Zeile, 3. Spalte). 


Das Relationen-Modell ist weit anschaulicher als das Netzwerk- 
Modell. Komplexe Datenstrukturen allerdings lassen sich in ei- 
ner "flachen Matrix" nur schwer darstellen. 


Ursprünglich lag die Aufgabe eines Datenbank-Systems in der 
Informationswiedergewinnung (= Information Retrieval) bzw. in 
der Auskunftserteilung. Zunehmend werden kommerzielle Daten- 
bank-Systeme angeboten, die darüberhinaus andere Aufgaben wie 
das Rechnen (sogenannte "rechnende Datenbanken!) oder z.B. die 
Textverarbeitung übernehmen. 

"... eine dedizierte Datenbank - Maschine, 
die mit einem Host-Computer günstiges Datenmanagement bietet". 
Was beinhaltet eine solche Anzeige? 

Eine Datenbank-Maschine ist kein Allzweck-Computer, sondern 
ein Automat, dessen Hardware ausschließlich auf die Verwaltung 
einer Datenbank ausgerichtet bzw. dediziert ist. Darüberhinaus 
gibt es kein "'normales' Betriebssystem, sondern nur ein Soft- 
warepaket, das immer im Speicher resident ist und dabei sämt- 
liche Funktionen einer relationalen Datenbank übernimmt. Damit 
sind wir bei der Begründung: Relationale Datenbanken benötigen 
viel Speicherplatz sowie CPU-Zeit, der Personalcomputer wird 
allzuleicht überlastet. Deshalb die Hinwendung von der "Soft- 
ware-Datenbank" zur "Hardware-Datenbank-Maschine", die an den 
Personalcomputer als Host bzw. Wirt und Gastgeber (vgl. auch 
Abschnitt 1.3.6.5) angeschlossen wird. Diese Lösung hat die 
folgenden Vorteile: Der PC als Host wird durch die Datenbank 
belastet; die Größe der Datenbank ist unabhängig von der Größe 
des Personalcomputers. 


1.3.6 System-Software (Betriebssystem) 


Das Betriebssystem mit seinen Steuer-, Dienst- und Übersetzer- 
programmen (vgl. Abschnitt 1.3.1.2) dient als Mittler zwischen 
dem Anwender (-programm) und dem Computerkern (Hardware). 
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1.3.6.1 Betriebssystem als Firmware (ROM) oder als Software 


Hinsichtlich der Speicherung des Betriebssystems gibt es zwei 
extreme Möglichkeiten, die gerade für Personalcomputer von In- 
teresse sind: 

Auf der einen Seite ist das Betriebssystem fest in ROMs unter- 
gebracht (ROM als Festspeicher enthält die Systemprogramme als 
Firmware) und steht beim Einschalten des Computers unmittelbar 
zur Verfügung. Diese Möglichkeit ist vorteilhaft, wenn man nur 
mit einer einzigen Programmiersprache arbeiten möchte. "Reine 
BASIC-Maschinen' z.B. sind oft so aufgebaut und sehr einfach 
zu bedienen. 

Auf der anderen Seite ist das Betriebssystem als Software auf 
einem Externspeicher (Diskette, Hard Disk) gespeichert und muß 
beim Einschalten des Computers vom Benutzer in den Internspei- 
cher geladen werden. Diese umständlichere Art der Bedienung 
(Handling) hat für den Benutzer jedoch den Vorteil, daß leicht 
z.B. auf eine andere Programmiersprache wie COBOL, PASCAL oder 
FORTH umgerüstet werden kann: er muß nur das zugehörige Über- 
setzerprogramm für COBOL, PASCAL bzw. FORTH von einer Diskette 
in den RAM laden. 

Personalcomputer mit mehreren Betriebssystemen (z.B. MS-DOS, 
CP/M und UCSD) haben diese stets als Software gespeichert. 


zwischen der reinen Firmware-Lösung (Betriebssystem im ROM ) 
und der reinen Software-Lösung (Betriebssystem auf Diskette) 
als Extremen gibt es natürlich Zwischenlösungen. So kann beim 
Einschalten des Computers z.B. die Sprache BASIC aus dem ROM 
automatisch für den Benutzer mit der Möglichkeit zur Verfügung 
gestellt werden, später aus BASIC "auszusteigen',um ein anderes 
Betriebssystem bzw. Sprachmittel softwaremäßig zu laden. 


1.3.6.2 Beispiel: Betriebssystem unterstützt Computer-Start 
Die Funktion des Betriebssystems läßt gut sich am Beispiel des 


Startens eines Personalcomputers veranschaulichen. Man geht in 
drei Schritten vor. 


Internspeicher (RAM): Externspeicher (Diskette): 


Startpröogramm aus ROM | 


Disketten-Directory 


Disketten-Directory 








Sonstige Systemprogramme 
|des Betriebssystems 


Sonstiges 
Betriebssystem 





frei für Benutzer Anwenderprogramme A,B,..».,S 





frei für Benutzer 





Schritt (1): "Computer einschalten' und Betriebssystem 
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Schritt (1) : Gerät anschalten. Aus einem ROM als Nur- 
Lese-Speicher wird automatisch ein Startprogramm zur Ureingabe 
in den Hauptspeicher gebracht. Dieses lädt die Datei-Directory 
(Verzeichnis der auf Diskette gespeicherten Dateien sowie Pro- 
gramme) ebenfalls in den RAM wie auch das Betriebssystem mit 
seinen Programmen. Das Betriebssystem zeigt nun dem Benutzer am 
Bildschirm durch ein Zeichen an, daß der Computer betriebsbe- 
reit ist. Der Benutzer befindet sich auf der Betriebssystem- 
Ebene (System Mode). 


Schr it t (2) : Der Benutzer hat sich entschieden, BASIC 
zu laden und tippt den entsprechenden Betriebssystem-Befehl 
ein. Das Betriebssystem prüft in der Disketten-Directory nach, 
ob auf der Diskette das BASIC-Übersetzerprogramm auch vorhan- 
den ist und lädt es zusätzlich in den RAM. Dies entspricht der 
oben angesprochenen Software-Lösung; bei der Firmware-Lösung 
wurde Schritt (2) automatisch als Teil einer starren Befehls- 
folge nach dem Einschalten ablaufen. 


Internspeicher (RAM): Internspeicher (RAM): 


|Startprogramm aus ROM | Startprogramm aus ROM 


Disketten-Directory - | | Disketten-Directory 


Sonstiges Sonstige 
Betriebssystem | |Betriebssystem 


BASIC-Interpreter |BASIC-Interpreter 


| Anwenderprogramm A 


frei für Benutzer | 


frei für Benutzer 





(2) 'BASIC laden' (links) und (3) 'Prog. A laden' (rechts) 


Schr it t (3) : Der Benutzer kann sich jetzt ein auf der 
Diskette enthaltenes Anwenderprogramm in den RAM laden wie im 
Beispiel das Programm A. Das Übersetzerprogramm (ein Interpre- 
ter, wie im folgenden Abschnitt zu zeigen) ruft zum Laden das 
Betriebssystem auf, welches nach dem Ladevorgang wiederum die 
Kontrolle an das Übersetzerprogramm zurückgibt. 

Anschließend kann der Benutzer in einem Schritt (4) das Anwen- 
derprogramm A ausführen lassen. 


1.3.6.3 Übersetzerprogramme 


Ein Computer versteht soviele Programmiersprachen (=Fremdspra- 
chen) wie Übersetzerprogramme vorhanden sind. Die Übersetzer- 
programme wandeln Programmiersprache in die Maschinensprache 
(=Muttersprache des Computers) um. 

Es gibt maschinenorient ie rt e Programmier- 
sprachen, bei denen als "1-zu-1-Sprachen" dann meist 1 Fremd- 
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sprachenanweisung zu 1 Maschinenbefehl führt; sie heißen auch 
Assembler (-sprachen). 

Das Gegenstück sind die problemorientierten 
Programmiersprachen als "1-zu-mehr-Sprachen". Bei ihnen wird 
I Fremdsprachenanweisung in mehrere Maschinensprachenbefehle 
übersetzt wird. Die zugehörigen Übersetzerprogramme sind ent- 
weder Compiler oder aber Interpreter. 


Programmiersprachen als Fremdsprachen für Computer 


maschinenorientierte problemorientierte 
1-zu-1-Sprachen 1-zu-mehr-Sprachen 
Quellenprogramm Quellenprogramm Quellenprogramm 
ASSEMBLER COMPILER INTERPRETER 
übersetzt übersetzt übersetzt 
programmweise programmweise anweisungsweise 
Maschinenprogramm Maschinenprogramm Maschinenbefehl 
als Objekt als Objekt als Objekt 


Maschinen- und problemorientierte Programmiersprachen 


Jeder Computer hat seine eigene maschinenorien- 
t ijer t e Programmiersprache, die - obwohl von Computer zu 
Computer z.T. verschieden aufgebaut - stets Assembler 
heißt. Das in Assembler geschriebene Programm (auch Quellen- 
programm, Quellcode oder Source-Listing genannt) kann der Com- 
puter noch nicht verstehen. Ein Übersetzerprogramm, das (ver- 
wirrend? ) ebenfalls Assembler genannt wird, übersetzt nun das 
Quellenprogramm in die für die CPU verständliche Maschinen- 
sprache als Objektprogramm. Das eigentliche Maschinenprogramm 
steht als Abfolge hexadezimaler Bytes computerverständlich im 
Internspeicher; da es für uns nur schwer lesbar ist, wird es 
vom Assembler zur Kontrolle als Assembler-Listing ausgegeben. 


Interpreter und Compiler als Übersetzer- 
programme arbeiten analog zum menschlichen Sprachübersetzer 
wie folgt: 

Ein Interpreter (to interprete = auslegen) arbeitet wie ein 
Simultan-Dolmetscher: Der Dolmetscher übersetzt Satz für Satz, 
um das Ergebnis sofort mitzuteilen. Ein Interpreter übersetzt 
Anweisung für Anweisung, um jede Anweisung sofort auszuführen. 
Ein Compiler (to compile = zusammensetzen) hingegen arbeitet 
wie ein 'normaler' Fremdsprachenübersetzer: Dieser übersetzt 
das gesamte Fremdsprachenschriftstück zu einem bestimmten Ter- 
min. Entsprechend übersetzt ein Compiler das gesamte Anwender- 
programm komplett in einem Arbeitsgang: Das in einer sogenann- 
ten Hochsprache verfaßte Programm wird in einem gesonderten 
Compilierungslauf in ein lauffähiges Maschinenprogramm über- 
setzt. 

Die Vorteile eines compilierenden Systems (z.B. Objektprogramm 
in 0/1-Form ablauffähig auf Externspeicher abgelegt, Programm- 
ausführung sehr schnell) und seine Nachteile (z.B.eine Feh- 
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lerkorrektur erfordert die komplette Neuübersetzung, Speicher- 
bedarf für Quelle, Übersetzer und Objekt sehr groß) sind stets 
abzuwägen. 

Günstig ist: Programmentwicklung sowie Programmtest mit einem 
Interpreter und dann abschließende Compilierung des Programms. 


Gerade bei Personalcomputern lassen sich Interpreter und Conm- 
piler kaum mehr streng trennen. So gibt es compilierende In- 
terpreter und interpretierende Compiler. 

Zum '"compilierenden Interpreter' ein Beispiel: 

Die große Softwarefirma Microsoft hat solche Zwischenlösungen 
als BASIC-Interpreter z.B. für Apple, CBM, TRS-80 entwickelt. 
Dabei werden die BASIC-Zeilen beim Eintippen -für den Benutzer 
unbemerkt- in einen sogenannten Zwischencode übersetzt (PRINT 
wird z.B. als hexadezimal BA bzw. dezimal 186 zwischengespei- 
chert, nicht aber in fünf ASCII-Zeichen bzw. Bytes als PRINT). 


Zum 'interpretierenden Compiler' ebenfalls ein Beispiel: 

Der unter dem Betriebssystem UCSD laufende PASCAL-Compiler 
übersetzt den Quellcode in e i n e m getrennten Übersetzungs- 
lauf in einen Zwischencode (P-Code genannt für Pseudo-Code), 
der dann zur Ausführungszeit durch einen Interpreter weiter 
übersetzt wird. 


Reiner interpretierender Reiner 

Interpreter: Compiler: Compiler: 
rer a a] NER BEER] REERTER, 
Quellcode Quellcode Quellcode 





'COMPILER' COMPILER 
et nd ae Fe 
Zwischencode Quellcode 


Auiehaneste nn 


P.r0.8 ram m ä us führung mittels RUN 


ae N RA FE 


Quellcode Zwischencode Quellcode 


INTERPRETER INTERFRETER 
V v 


Interpreter und Compiler mit Zwischenlösungen 


50 1 Computer allgemein 


1.3.6.4 Programmiersprachen 


Es gibt mehrere Hundert Programmiersprachen. Die wichtigsten 
Sprachen werden in Stichworten beschrieben: 


ADA: Diese nach Lady Ada Augusta benannte Sprache wurde 1980 
vom US - Verteidigungsministerium herausgebracht (wie früher 
COBOL) und wird als Universalsprache eine vielleicht ebenso 
große Verbreitung finden wie COBOL. ADA-Subsets laufen bereits 
auf Personalcomputern. 


ALGOL 60: Diese 'ALGOrithmic Language' gibt es seit 1960. Sie 
wird vornehmlich im Hochschulbereich eingesetzt. 


APL: "A Programming Language' gilt als eines der mächtigsten 
und knappsten Sprachmittel. Berühmt sind die APL-Einzeiler mit 
ihren Kurz-Operatoren (griechische Symbolik). Auf Personalcom- 
putern mit 16-Bit-Prozessoren läuft APL stets als Interpreter. 


ASSEMBLER: Die maschinenorientierten Assembler-Sprachen (vgl. 
Abschnitt 1.3.6.3) gehören eigentlich nicht in diese Übersicht 
von Hochsprachen bzw. 1-zu-Mehr-Sprachen. Makros als Gruppen 
von Einzelbefehlen jedoch machen das maschinennahe Arbeiten in 
Assembler etwas weniger mühsam. 


BASIC: Für diese auf Personalcomputern am weitesten verbrei- 
tete Sprache (Beginners All Purpose Symbolic Instruction Code) 
gibt es fast so viele Dialekte wie Computertypen. Am weitesten 
ist das "Microsoft-BASIC" verbreitet. BASIC gibt es sowohl als 
compilierende Sprache (z.B. C-BASIC) wie auch als Interpreter. 
BASIC gehört zu den unstrukturierten Sprachen. 


C: In der Sprache C ist das Betriebssystem UNIX geschrieben. 
Es kann PASCAL-ähnlich strukturiert programmiert werden, dabei 
werden aber weniger Datentypen und mehr Operatoren (etwa wie 
in APL) bereitgestellt. Gut in C: Zeiger (Pointer) zur Adreß- 
verkettung. Die C-Compiler sind leider nicht standardisiert. 


COBOL: Die "Common Business Oriented Language! gibt es bereits 
seit 1959. COBOL ist d i e kommerzielle Programmiersprache, 
genormt, äußerst umfangreich. Ungefähr 50% aller US-Software 
ist in COBOL geschrieben. Zitat: "COBOL ist nicht gut, aber es 
gibt viele Programmierer, die diese Sprache gut beherrschen". 


ELAN: Diese Ende der 70er Jahre in Berlin entwickelte Sprache 
unterstützt das strukturierte Programmieren und wird im Schul- 
bereich in Konkurrenz zu PASCAL eingesetzt. 


FORTH: Dies ist eine interpretierende Sprache, die jedoch zu- 
nächst den FORTH-Text in einen Zwischencode übersetzt (siehe 
Abschnitt 1.3.6.3). FORTH gibt es auch für kleinere Computer. 


FORTRAN: Der 'FORmula TRANslator' entstand 1950 und gilt als 
die wichtigste Hochsprache zur Lösung math/naturwissenschaft- 
licher Probleme. Wie COBOL ist FORTRAN eine typische Großcom- 
putersprache. BASIC ist ein FORTRAN-Abkömmling. 
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e LISP: Der LISP-Interpreter wird insbesonders von Wissenschaft- 
lern verwendet, die sich mit der 'Künstlichen Intelligenz' be- 
schäftigen (Nachahmung des menschl. Gehirns durch die CPU, Ab- 
schnitt 1.1.3). Eine LISP-Variable hat als 'Atom' neben Namen 
und Wert vom Programmierer frei zu vereinbarende Merkmale, die 
als Liste geführt werden (deshalb: LISP für LISt Processor). 


e LOGO: "Anders als die anderen Sprachen". Diese Aussage trifft 
für APL (im Hinblick auf die komprimierte Problembeschreibung 
über mächtige Operatoren) sowie für LOGO (im Hinblick auf die 
kindgerechte Schildkrötengrafik) zu. Bei den "Turtle Graphics" 
kann die am Bildschirm kriechende Schildkröte zum Zeichnen von 
Bildern gesteuert werden. LOGO-Interpreter kommen mit wenig 
Platz aus und sind zunehmend für Personalcomputer erhältlich. 


e MODULA 2: Diese Sprache wurde von Niklaus Wirth als Nachfol- 
gesprache zu PASCAL entwickelt. Besondere Merkmale: Typische 
'Hochsprachen-Anwendungen' sind ebenso möglich wie maschinen- 
nahe Programmierung; ausgereifte Modularisierung (Module als 
Bausteine -anders als in PASCAL- separat speicherbar in Modul- 
Bibliothek); Compiler kann Maschinencode erzeugen zwecks Ein- 
brennen in PROMs (damit Nutzung als Entwicklungssprache für 
Mikrocomputerprodukte). Es wird erwartet, daß sich MODULA 2 
durch ihre Kompaktheit als Alternative zu ADA behaupten wird. 


e PASCAL: "PASCAL erzieht zum klaren Programmieren" - aus diesem 
Grunde halten gerade die Lehrer so viel von dieser von Niklaus 
Wirth 1972 erstmalig beschriebenen Sprache. PASCAL ist nach 
dem Mathematiker und Philosophen Blaise Pascal (1623-1662) be- 
nannt und gilt als d i e Sprache für das strukturierte Pro- 
grammieren. Leider ist nur das ursprüngliche Wirth'sche PASCAL 
standardisiert, nicht aber die später notwendig gewordenen Er- 
weiterungen (wie Grafik-, Text- und Dateiverarbeitung; Wirth 
beschrieb so z.B. nur die sequentielle Banddatei). So sind die 
sehr zahlreichen auch für Personalcomputer verfügbaren PASCAL- 
Compiler oft nicht kompatibel: etwa ALCOR-PASCAL, JRT-PASCAL, 
PASCAL/MZ+, PASCAL/Z, ProPASCAL, TCL-PASCAL, SCHTAC-PASCAL 
und UCSD-PASCAL, wobei sich letzteres fast zum Ersatz-Standard 
entwickelt hat. 


e PILOT: Diese "Programmed Inquiry Learning or Teaching' ist für 
Personalcomputer als BASIC-Ersatz für Lehr-/Lernzwecke ent- 
wickelt worden. PILOT arbeitet ausschließlich interpretierend. 
PILOT wird eingesetzt im Rahmen des Computer-unterstützten Un- 
terrichts (CUU) bzw. der Computer Aided Instruction (CAI). 


e PL/1: Die "Programming Language 1' wurde von der IBM für Groß- 
computer entwickelt und umfaßt die Sprachelemente von COBOL und 
FORTRAN zusammen - aber modern strukturiert. Wertmäßig dürfte 
die in PL/1 geschriebene Software nach der COBOL-Software den 
zweiten Platz einnehmen. Für PCs gibt es PL/1 (noch?) nicht. 


e Diese Auswahl kann keinesfalls vollständig sein. Die Liste von 
Programmiersprachen ließe sich fortsetzen: BCPL, COMAL, CORAL, 
DIBOL, EUCLID, MUMPS, PEARL, PL/M, PROLOG, RPG II, SIMULA 67, 
SNOBOL, STOIC, ... 

Abschließend: Vermutlich werden in 10 Jahren Programmierspra- 
chen überwiegen, die heute noch nicht einmal entworfen sind. 
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1.3.6.5 Herstellerabhängige und unabhängige Betriebssysteme 


Die Abkürzung DOS steht für "Disk Operating System'. Es ist 
ein Systemprogramm, das alle mit der Diskette verbundenen Ein- 
und Ausgaben kontrolliert. Die Bezeichnung DOS findet sich als 
Namensbestandteil zahlreicher Betriebssysteme. 

Das DOS für den Apple wie auch das TRS-DOS der TRS-80-Model- 
le von Tandy sind Beispiele für Betriebssysteme, welche vom 
Personalcomputer-Hersteller speziell auf das eigene Gerät hin 
zugeschnitten wurden. Herstellerabhängige 
Systeme findet man vornehmlich bei kleineren Personalcomputern 
mit 8-Bit-Mikroprozessoren. 


Personalcomputer der 16-Bit-Klasse und 32-Bit-Klasse arbeiten 
überwiegend mit herstellerunabhängigen 
Betriebssystemen, die von Software-Produzenten entwickelt wur- 
den. So mit CP/M und MS-DOS der beiden Software-Giganten Digi- 
tal Research und Microsoft, mit UCSD der Universität von San 
Diego in Californien, mit UNIX, XENIX, OASIS, ..... 

Wie kam es dazu? Früher baute jeder Hersteller sein eigenes 
Betriebssystem, um es mit dem Computer als Einheit anzubieten. 
Um das Betriebssystem herum wurde ein großer Schleier gelegt - 
ein Übernehmen oder Anpassen an einen anderen Computer war so- 
mit unmöglich. Dies änderte sich erst, als die Software-Firma 
Digital Research ihr "Control Program for Microcomputers', ge- 
nannt CP/M, als herstellerunabhängiges Software-Produkt anbot: 
mit einer exakten Beschreibung der Verbindung (Schnittstellen) 
des Betriebssystems zur Computerhardware. Nun begannen immer 
mehr Hersteller, CP/M-fähige Computer zu produzieren. Mit der 
raschen Verbreitung von CP/M nahmen solche Programme zu, die 
CP/M-verträglich waren. Ursprünglich wurde CP/M für den Mikro- 
prozesor 8080 und später für den Z-80-Prozessor eingesetzt, 
deshalb die Bezeichnung CP/M-80. 

Die Variante CP/M-86 wurde für den 8086-Prozessor entwickelt. 
Über das BIOS (Basic Input-Output System) als dem adaptierba- 
ren Teil des CP/M läßt sich dieses prozessorabhängige System 
an Computer anpassen, die eine CPU haben, welche z.B. den Code 
des Intel 8088 verarbeiten. 


Betriebssystem 


herstellerabhängig: herstellerunabhängig: 


GE Mm mm Im Mm; IM: Mm HMM: TEE: TMMmE THMME: ÖMmMEmIS HMBMN FmBMEm: Mm femmis hmmn  omm m De De Me Me se Me 


Apple-DOS für Apple 
TRS-DOS für Tandy 


prozessorabhängig: prozessorunabhängig: 
CP/M-80 für 8080, Z80 UCSD-P - System 
CP/M-86 für 8086 

Implementierung über Implementierung über 
BIOS P-Code-Interpreter 


Herstellerabhängige und -unabhängige Betriebssysteme 
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1.3.6.6 Einige Betriebssysteme kurzgefaßt 


Auf die Betriebssysteme CP/M, MS-DOS, UNIX und USCD wollen wir 
kurz eingehen. 


Zunächst zu CP/M von Digital-Research: 

CP/M war das erste Betriebssystem für PCs, wurde seit 1974 an- 
geboten und entwickelte sich schon bald zum Quasi-Standard für 
8-Bit-Computer mit den CPUs 8080, 8085 und 2-80. Im Hinblick 
a die 80er-CPUs bezeichnet man dieses Betriebssystem oft als 
CP/M-80. 

Für 16-Bit-Computer mit der CPU 8086 von Intel entwickelte Di- 
gital Research das Betriebssystem CP/M-86. Da CP/M-80 zum Teil 
in Assembler geschrieben ist, stellt CP/M-86 eine Neuentwick- 
lung dar (die CPU 8086 arbeitet in einem anderen Code als die 
CPUs der 80er Serie). Deshalb auch die Probleme bei der Kompa- 
tibilität zwischen CP/M-80 und CP/M-86. 

Für den Multi-User-Betrieb bietet Digital Research die Systeme 
MP/M-80 sowie MP/M-86 (Multiprogramming Monitor for Microcom- 
puter) an. 

Das Betriebssystem CONCURRENT CP/M wurde für den Single-User- 
Betrieb unter Multi-Tasking entworfen: mehrere Aufgaben können 
als Tasks gleichzeitig auf e i ne m PC bearbeitet werden. 
MP/M sowie CONCURRENT CP/M erweitern den Leistungsumfang des 
CP/M um die jeweiligen Funktionen des Multi-üsing bzw. Multi- 
Tasking. 

Das Betriebssystem PERSONAL CP/M läßt sich in einem ROM unter- 
bringen und eignet sich deswegen auch für PCs ohne Disketten- 
laufwerk. PERSONAL CP/M wurde eigens für kleinere PCs entwik- 
kelt und unterstützt sowohl 8-Bit-CPUs als auch 16-Bit-CPUs. 


Zu MS-DOS von Microsoft: 

Als Konkurrenprodukt zu CP/M-86 von Digital Research brachte 
die Softwarefirma Microsoft das Betriebssystem MS-DOS heraus. 
IBM wählte für seinen PC als Betriebssystem MS-DOS, und zwar 
in einer Version, die den Namen PC-DOS erhielt und hardware- 
abhängiger ist als MS-DOS selbst. Durch die Wahl dieses Be- 
triebssystems wurde MS-DOS sehr populär. 

Für den "PC jr." von IBM wurde das Betriebssystem MS-DOS 2.1 
entwickelt. In seiner Funktionalität steht es auf einer Stufe 
mit MS-DOS 2.0 oder MS-DOS 2.11, es kann aber ohne Disketten- 
laufwerk eingesetzt werden (viele Teile von MS-DOS 2.1 sind im 
ROM untergebracht und nicht im RAM). 

Die Version MS-DOS 3.0 ist für Multi-Using und für Multi-Tas- 
king konzipiert. 


Zum Betriebssystem UNIX: 

Im Gegensatz zu CP/M sowie MS-DOS ist das Betriebssystem UNIX 
nicht in Assembler, sondern fast vollständig in der Sprache C 
geschrieben. Damit ist UNIX auf alle PCs übertragbar, die über 
einen C-Compiler verfügen. UNIX wurde von Wissenschaftlern für 
Wissenschaftler geschrieben - entsprechend profihaft wie kom- 
pliziert ist seine Benutzung. Deshalb wurden viele von UNIX 
abgeleitete und leichter bedienbare Betriebssysteme entwickelt 
wie ZEUS von Zilog, GENIUS von National, REGULUS von Motorola 
und XENIX von Microsoft. 

Das bekannteste UNIX-Derivat ist XENIX. Es unterstützt Multi- 
Using wie auch Multi-Tasking. 
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Zum Betriebssystem UCSD: 

UCSD ist die Abkürzung für University of California San Diego, 

Früher stand UCSD für das Programmiersprachsystem UCSD-Pascal, 

während es heute als umfassendes Betriebssystem mehrere Über- 

setzer anbietet wie BASIC-Compiler, FORTRAN 77-Compiler, LISP- 

Interpreter, MODULA-2-Compiler und natürlich PASCAL-Compiler. 

UCSD (auch als UCSD-P oder UOS für Universal Operating System 

bezeichnet) unterscheidet sich von CP/M und MS-DOS durch drei 

Merkmale: 

- Konsequente Menüsteuerung anstelle einer Kommandosteuerung 
und damit enge Benutzerführung. 

- Bereitstellung einer komfortablen und abgeschlossenen Pro- 
grammentwicklungsumgebung (mit Editor, Filer, Compiler, ...) 
anstelle einer reinen Laufzeitumgebung. 

- Hervorragende Portabilität durch die Mitnahme der Computer- 
architektur. 

Das UCSD-Betriebssystem ist prozessorunabhängig und damit für 

Personalcomputer jeglichen Prozessortyps einsetzbar. 

Wie ist dies möglich? UCSD benutzt den jeweiligen Personalcom- 

puter als Host-Computer im Sinne eines Wirtes bzw. Gastgebers. 

Es arbeitet also nicht unmittelbar mit dem Personalcomputer, 

sondern mit einem Pseudo-Computer. Gibt der Benutzer z.B. ein 

Quellenproggramm in PASCAL ein, so übersetzt der Compiler die- 

ses Textfile in einen Zwischencode (vgl. Abschnitt 1.3.6.3), 

der P-Code genannt wird, um das resultierende P-Code-File dann 
ebenfalls abzuspeichern. Soll dieses Programm nun ausgeführt 
werden, so wird es von einem P-Code-Interpreter vom P-Code in 
die Maschinensprache des jeweiligen Personalcomputers als Host 
übersetzt. Der Compiler ist fester Bestandteil des Betriebs- 
systems und selbst in PASCAL geschrieben. Der P-Code-Interpre- 
ter dagegen ist in der Maschinensprache des Hosts geschrieben. 
Soll UCSD auf einem Personalcomputer implementiert werden, So 
ist u.a. nur ein P-Code-Interpreter für die entsprechende CPU 
zu schreiben. Da UCSD auf einem P-Computer als abstraktem Com- 
puter läuft, der allein softwaremäßig auf dem Personalcomputer 
als Host nachgebildet wird, ist eine rasche Verfügbarkeit die- 
ses Betriebssystems auf neuen Personalcomputern zu erwarten. 








Benutzer- Pseudo-Computer Personalcomputer 
eingabe: als P-Computer: als Host-Computer: 
Quellcode Objektcode 1 Objektcode 2 








als Textcode als P-Code als Maschinencode 





Compiler P-Code-Interpreter 
übersetzt übersetzt 
(P=Pseudo) 


UCSD behandelt den Personalcomputer als Host bzw. Gast 


Der Trend geht eindeutig dahin, meh re r e Betriebssysteme 
für einen Computer bereitzustellen. So sind für den IBM Perso- 
nalcomputer die drei Betriebssysteme MS-DOS von Microsoft, 
CP/M-86 und UCSD-P nutzbar. 
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1.3.7 Anwender-Software entwickeln 


Die Programmentwicklung wird als Teil der DV-Systementwicklung 
vorgenommen und vollzieht sich wie diese in Teilschritten. Mag 
die Terminologie hierzu auch unterschiedlich sein, die Pro- 
grammentwicklung wird stets in der Schrittfolge "PROBLEMSTEL- 
LUNG - PROGRAMMENTWURF - PROGRAMMIERUNG - ANWENDUNG" durch- 
geführt werden. Am Beispiel der Rechnungsstellung bzw. Faktu- 
rierung wollen wir diese Teilschritte im Abriß kurz erläutern. 


Progr an m oe nn trwikie kilvn Arg 


DOKUMEN- 
TATION 


PROGRAMMIERUNG: 









PROBLEM- PROGRAMMENTWURF: 
STELLUNG 





Problemanalyse: 





- Teilprobleme Codierung 
(Module) 


- A-E-V-Analyse 


ANWENDUNG 


Eingabe 


Algorithmus (Ablauf): 






Darstellungsformen: 
Schrittplan 
Blockdiagramm 
Datenflußplan 
Programmablaufplan 
Struktogramm 
Entwurfsprache 


Techniken, Werkzeuge (Software-Tools) 


Programmentwicklung in Teilschritten 


Übersetzung 






Programmtext 





1.3.7.1. Problemanalyse 


Ein Problem analysieren heißt, dieses in seine Bestandteile zu 
zerlegen. Bei der Problemanalyse geht man nach der Idee 'Vom 
Einfachen zum Schwierigen' von den Ausgabedaten aus, da diese 
ja mit der Problemstellung. als erwartetem Resultat vorgegeben 
sind. Erst danach wendet man sich der Analyse der Eingabe und 
der Verarbeitung zu. | 

Ausgabe-Analyse: Daten (z.B. Rechnungszeile mit Artikelnummer, 
Bezeichnung, Menge, Einheit, Einzel- und Gesamtpreis), Form 
(z.B. Drucker für Rechnung, Diskette für Offene-Posten-Datei), 
Listbilder zum Ausgabeformat, Zeitpunkt der Ausgabe. 
Eingabe-Analyse: Daten (Kundennummer, Artikelnummer und Anzahl 
sowie Datum), Form (z.B. Tastatur, Diskette für Kundendatei u. 
Artikeldatei). 

Verarbeitungs-Analyse: Die Verarbeitungsschritte ergeben sich 
aus den Ausgabe- und Eingabeanforderungen (z.B. Menge*Einzel- 
preis ergibt Gesamtpreis). 

In einer Variablenliste werden sämtliche Namen mit Datentypen 
zusammengefaßt. In einem Datei-Verzeichnis werden die Dateien 
mit den entsprechenden Datensatz-Beschreibungen festgehalten. 
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1.3.7.2 Formen zur Darstellung des Lösungsablaufes 


Für den dann zu entwickelnden Algorithmus bzw. Lösungsablauf 
stehen die unterschiedlichen Darstellungsformen zur Verfügung. 


Ein Schritt plan kann jetzt so aussehen: 
1. Rechnungs- und Kundennummer mit Datum eintippen. 
2. Rechnungskopf drucken 

3. Rechnungszeile(n) aufbereiten und drucken 

4. Rechnungsabschluß drucken 

5. Kundendatei aktualisieren 

6. Eintrag Offene-Posten-Datei 


Als Blockdiagramm kann dieser Schrittplan schon 
feiner gegliedert bzw. strukturiert sein wie z.B. Schritt 1: 
Schritt 1 


Tastatur- Kunde Ausgabe 
eingabe prüfen Kundensatz 


zu "Kunde prüfen': Ist ein Kunde mit der eingetippten Nummer 
nicht in der Kundendatei enthalten, wird eine Meldung ausgege- 
ben. Zu "Ausgabe Kundensatz': Zur Kontrolle wird der gesamte 
Inhalt des Kundensatzes am Bildschirm gezeigt. 





Im Daten f lu ß p lan werden die Datenträger bzw. Ge- 
räte, die Arten der Bearbeitung und der Datenfluß zwischen den 
Datenträgern grafisch festgehalten. 


TDHAPYTX 


Bearbeitung Hilfs- Eingabe Trennen Sortieren ischen Mischen und 
allgemein funktion von Hand Trennen 
Datenträger: Sy 
Datenträger Schrift- Loch- NIrOEWe: Magnet- Kassette Diskette 
allgemein stück karte platte 
Datenfluß: 

Flußlinie Datentrans- Datenübertra- Anschluß- Bemerkung 

port loff-line) gung lor-line) punkt 


Sinnbilder für Datenflußpläne nach DIN 66001 
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Für die Rechnungsschreibung könnte der Datenflußplan in seiner 
knappsten Form etwa so aussehen: 





Tastatur- Be] Rechnungs- 
eingabe ausdruck 
Rechnungs- 


EN schreibung 
Es 


\ 





af 


Kundendatei Artikeldatei Offene-Posten-Datei 


Einfacher Datenflußplan zur Rechnungsschreibung 


Der Datenflußplan bezieht sich mehr auf die Hardware, während 
der Programmablaufplan (PAP) mit der zeich- 
nerischen Darstellung des geplanten Programmablaufes eindeutig 
softwarebezogen ist. Die Sinnbilder für den PAP sind ebenfalls 
nach DIN 66001 genormt. Im Datenflußplan wie im PAP gleichbe- 
deutend sind die Sinnbilder für Anschlußpunkt sowie für Be- 
merkung. Eine im PAP etwas andere Bedeutung hat das Rechteck 
(Wertzuweisung) und das Parallelogramm (Eingabe , Ausgabe). 
Neu im PAP sind die 

Sinnbilder für die 

Verzweigung und für 

das Aufrufen eines 

Unterprogramnms. Verzweigung Unterprogramm 


Die zum Teilschritt "Kunde prüfen' (obiger Schrittplan) zuge- 
hörige Anweisungsfolge kann als PAP z.B. so aussehen: 


Kundennummer eintippen 


Kunde auf Datei vorhanden? Fehler- 
meldung 
ausgeben 

wenn Kundennummer ungültig, 

dann Zurückverzweigen 


Neben dem PAP wird immer häufiger ein weiteres Hilfsmittel zur 
zeichnerischen Darstellung von Programmabläufen verwendet: das 
Struktogramm ,„ auch Strukturdiagramm oder (nach dem 
Erfinder) Nassi-Shneiderman-Diagramm genannt. Struktogramme 
haben wir bereits in Abschnitt 1.3.3 verwendet, um damit die 
grundlegenden Programmstrukturen darzustellen. 


58 1 Computer allgemein 


Im folgenden Struktogramm wird der Ablauf 'Kunde prüfen' dar- 
gestellt: 


Kundennummer eintippen 


Kunde auf Datei? 


% Fehlermeldung ausgeben 


Wiederhole bis gültige Kundennummer eingetippt wurde 





Beim Struktogramm sind die Programmstrukturen deutlich erkenn- 


bar: eine nicht-abweisende Schleife, die eine 'Einseitige Aus- 
wahl' einschachtelt. 


Neben diesen grafischen Darstellungsmöglichkeiten des Lösungs- 
ablaufes verwendet man oft eine Entwurfsprache 
als Pseudocode, um den Programmentwurf umgangssprachlich dar- 
zustellen (Abschnitt 1.3.3.1). Der oben als PAP sowie Strukto- 
gramm dargestellte Ablauf läßt sich in der Entwurfsprache wie 
folgt beschreiben: 


Wiederhole 
Tippe die Kundennummer ein 
wenn die Kundennummer in der Kundendatei gefunden wurde 
dann tue nichts 
sonst zeige eine Fehlermeldung am Bildschirm 
Ende-wenn 


bis eine Kundennummer als gültig erkannt wurde 


Der algorithmische Entwurf stellt häufig die unmittelbare Vor- 
stufe zur Programmierung dar. 


1.3.7.3 Programmierung 


Programmier - System am Bildschirm aufrufen 





|Codierung und Eingabe 
(= Editieren über einen Editor) 













|übersetzen 
(= Compilieren über einen Compiler) 


wiederhole, bis Programm syntax-fehlerfrei 


Testen (Ausführung, Pogrammlauf) 


wiederhole, bis Programm logisch fehlerfrei 





Programmieren im engeren Sinne als Struktogramm 
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Programmieren heißt, den zeichnerisch und/oder verbal darge- 
stellten Algorithmus in eine Programmiersprache umzusetzen und 
auszutesten. Dabei werden die Schritte "'Codierung', "Eingabe', 
'Übersetzung' und '"Testen' zumeist wiederholt durchlaufen. Der 
Übersetzungslauf als gesonderter Schritt ist bei Sprachen mit 
Compiler, nicht aber bei solchen mit Interpreter erforderlich 
(vgl. Abschnitt 1.3.6.3). Das Austesten erfolgt als Computer- 
test sowie Schreibtischtest. 


Abschließend faßt man mit der Dokumentation alle 
Programmunterlagen als Gebrauchsanleitung zusammen: sei es als 
Anleitung für den Operator, damit dieser den Computer bei den 
Programmläufen auch richtig bedienen kann (Operator-Handbuch), 
oder als Anleitung für den Benutzer für die spätere Programm- 
pflege und Programmkorrektur (Benutzer-Handbuch). Zusätzlich 
zum Benutzer-Handbuch sollte eine Kurzanleitung vorliegen, die 
nur die wichtigsten für den Umgang mit dem Programm notwendi- 
gen Schritte und Anweisungen für den Interessenten bereithält. 


Zentraler Teil der Programmentwicklung ist der Programmentwurf 
und nicht -wie es manchem DV-Einsteiger scheinen mag- die Pro- 
grammierung bzw. Codierung in einer Programmiersprache. Es ist 
denkbar, daß die Codierung eines Tages automatisiert durchge- 
führt werden kann. 

Angesichts der steigenden Software - Kosten (Abschnitt 1.1.2) 
geht man immer mehr dazu über, die Programmentwicklung und da- 
bei besonders den Programmentwurf industriell und ingenieur- 
mäßig vorzunehmen: software - Engineering 
lautet die darauf verweisende Begriffsbildung. Auf einige der 
im Rahmen des Software-Engineering eingesetzten Programmier- 
techniken sowie Entwurfsprinzipien gehen wir nachfolgend ein. 


1.3.7.4 Programmiertechniken und Entwurfprinzipien 


Die Modulariswierung von Software berücksich- 
tigt, daß ein in kleine Teile bzw. Moduln gegliedertes Problem 
bzw. Programm einfacher zu bearbeiten ist. 'Klein' heißt, daß 
ein Modul maximal 200 Anweisungen umfassen darf. Ein Modul ist 
ein Programmteil mit einem Eingang und einem Ausgang und kann 
selbständig übersetzt und ausgeführt werden. Moduln verkehren 
nur über Schnittstellen miteinander, über die Werte (Parameter 
genannt) vom rufenden an das aufgerufene Modul übergeben wer- 
den; ein Modul darf als Black Box nichts vom Innenleben eines 
anderen Moduls wissen. 


Die Normier ung von Programmabläufen als Vereinheit- 
lichung durch eine standardisierte Ablaufsteuerung wird bei 
der Entwicklung komplexer kommerzieller Software-Pakete vorge- 
nommen, an der zumeist mehrere Mitarbeiter beteiligt sind. Je- 
des Softwarehaus hat seine eigenen Normen. 


Die Jackson - Methode geht bei der Pogramment- 
wicklung von der exakten Analyse der Datenstrukturen aus, um 
dann die entsprechenden Pogramm- bzw. Ablaufstrukturen zu ent- 
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werfen. Warum? In der kommerziellen DV sind die Daten zumeist 
bis in die Details vorgegeben, während die Abläufe den Daten 
gemäß formuliert werden müssen. Anders ausgedrückt: die Daten- 
struktur prägt die Programmstruktur. 


Dem Top - Down - Entwurf als Von-oben-nach- 
unten-Entwurf entspricht die Technik der schrittweisen Verfei- 
nerung: vom Gesamtproblem ausgehend bildet man Teilprobleme, 
um diese dann schrittweise weiter zu unterteilen und zu ver- 
feinern bis hin zum lauffähigen Programm. Der Top-Down-Entwurf 
führt immer zu einem hierarchisch gegliederten Programmaufbau. 


Der Bottom - Up - Entwurf als Gegenstück zum 
Top-Down-Entwurf geht als Von-unten-nach-oben-Entwurf von den 
oft verwendeten Teilproblemen der untersten Ebene aus, um suk- 
zessive solche Teilprobleme zu integrieren. Beide Entwurfs- 
prinzipien werden in der Praxis zumeist kombiniert angewendet. 


Die Unterprogrammtechnik wird in diesen 
drei Fällen genutzt:Ein Ablauf wird mehrfach benötigt; mehrere 
Personen kooperieren und liefern ihre Teilproblemlösungen als 
Unterprogramme ab; menügesteuerter Dialog (Menütechnik). Der 
Begriff des Unterprogramms bzw. der Prozedur entspricht dabei 
dem des Moduls. Die bekannteste Schnittstelle ist der Unter- 
programmaufruf mit Parameterübergabe. 


Die Menütechni k erleichtert den benutzergesteuer- 
ten Dialog. Über das Menü als Auswahlübersicht steuert der Be- 
nutzer den Ablauf des Programms, ohne zuerst alle Befehle ler- 
nen zu müssen. 

Das Menü als Gedächtnisstütze bei der Eingabe kann in Tabel- 
lenform alternativ zum Bildschirm, auf dem sonst der Dialog 
protokolliert wird, angeboten werden. Dies setzt den schnellen 
wechsel zwischen den Bildschirmseiten voraus. Oder das Menü 
wird als (Prompt-)Zeile ausgegeben, die zusätzlich zum Dialog 
ständig am oberen Bildschirmrand stehen bleibt. 

Bei der Split-Screen-Technik werden Rechteckbereiche des Bild- 
schirms wie eigenständige Bildschirme bzw. Fenster behandelt. 
Über ein solches Fenstersystem kann der Benutzer Menüs an je- 
der Stelle des Bildschirms erscheinen lassen. 

Die Menütechnik kann sich auf das Arbeiten innerhalb 
eines Programms wie auch auf das Verbinden mehrerer Programme 
beziehen. Im letzteren Fall wird beim Einschalten des Compu- 
ters bzw. beim Beenden eines Programms automatisch ein Menü- 
programm geladen, das am Monitor alle verfügbaren Programme 
anzeigt; der Benutzer kann durch Tippen z.B. eines Buchstabens 
dann das gewünschte Programm laden, ohne sich um den Speicher- 
ort auf Diskette kümmern zu müssen. Hierarchische 
Menüs teilen eine Aufgabe in übergeordnete Menü-Ebenen auf. 
Im Hauptmenü stehen häufig verwendete Funktionen und nach der 
Wahl erscheint das nächste Menü mit weiter detaillierten Funk- 
tionen. 

Pop-up-Menüs erscheinen auf Tastendruck, bieten mehrere Mög- 
lichkeiten zur Auswahl an und verschwinden, sobald eine Wahl 
getroffen wurde. Pop-up-Menüs halten also nicht auf und lenken 
auch nicht ab: sie erscheinen nur, wenn sie auch benötigt wer- 
den. 

Die Menüwahl erfolgt durch Klartexteingabe (Fehlerrisiko groß) 
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bzw. durch Tasten eines Zeichens oder dadurch, daß der Cursor 
auf die gewünschte Position gesetzt wird und dann die RETURN- 
Taste gedrückt wird. Die Menüwahl vereinfacht sich weiter bei 
Einsatz von Lichtgriffel oder Maus, 


Bei dr Overlaytechn ik werden Moduln überlagert 
(=overlay) - z.B. wenn der Hauptspeicherplatz nicht ausreicht, 
um alle Moduln gleichzeitig aufzunehmen. Das im Hauptspeicher 
stehende Modul ruft ein anderes Modul auf, das dann von einem 
Externspeicher geladen und dem rufenden Modul überlagert wird. 


Der strukturierte En t wu r f bedeutet, daß 
ein Programm unabhängig von seiner Größe nur aus den vier (in 
Abschnitt 1.3.3 erklärten) grundlegenden Programmstrukturen 
aufgebaut sein darf: aus Folge-, Auswahl-, Wiederholungs- sSOo- 
wie Unterprogrammstrukturen. Dabei soll auf unbedingtes Ver- 
zweigen mittels GOTO verzichtet werden. Jede Programmstruktur 
bildet einen Strukturblock. Blöcke sind entweder hintereinan- 
der angeordnet oder vollständig geschachtelt - die teilweise 
Einschachtelung (Überlappung) ist nicht zulässig. 

Sogenannte 'blockorientierte Sprachen' wie PASCAL, MODULA-2, 
ELAN und ADA unterstützen das Prinzip des strukturierten Ent- 
wurfs weit mehr als die "unstrukturierten Sprachen' wie BASIC 
und APL. 


Diese nur stichwortartig dargestellten Prinzipien dürfen nicht 
getrennt betrachtet werden; unter dem Informatik-Sammelbegriff 
strukturierte Programmierung faßt 
man sie zu einem heute allgemein anerkannten Vorgehen zusam- 
men. Die tragenden Prinzipien sind dabei der Top-Down-Entwurf 
mit der schrittweisen Verfeinerung einerseits und der struk- 
turierte Entwurf mit der Blockbildung andererseits. 


1.3.7.5 Programmgeneratoren 


Ein Programmgenerat or hat als Zwischenlösung 
seinen Standort zwischen der Programmierung in einer höheren 
Programmiersprache (BASIC, PASCAL) einerseits und dem Anpassen 
eines gekauften Anwenderprogramms durch Änderung der dafür an- 
gegebenen Parameter andererseits. 

So können im Dialog Benutzer-Computer Masken (Formulare) sowie 
Programmbeschreibungen erstellt werden, aus denen später z.B. 
BASIC-Anweisungen generiert, d.h. erzeugt werden. Die so er- 
zeugten BASIC-Programme sind über einen Interpreter lauffähig, 
können ggf. aber auch noch compiliert werden. 


Entsprechend spezialisiert werden Programmgeneratoren als Mas- 
kengenerator, Listengenerator, Grafikgenerator usw. bezeichnet 
und vor allem im Rahmen von Standard-Software bereitgestellt. 
Zum Maskengenerator ein Beispiel: Soll eine Maske für die Kun- 
dendatei erstellt werden, dann wird nach Aufruf des Generators 
auf dem Bildschirm eine Grundeinteilung vorgenommen. Der Be- 
nutzer setzt den Cursor dann auf die Stelle, an der ein Daten- 
feld angelegt werden soll, gibt die Bezeichnung ein (NAME) so- 
wie die Feldlänge (mit Cursor 20 Stellen nach rechts fahren). 
Auf diese Weise wird eine Bildschirmmaske aufgebaut. Der Gene- 
rator kann dann eine der Maske (als Blankoformular vorzustel- 
len) entsprechende Datei erzeugen bzw. einrichten. 
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1.3.8 Anwender-Software einsetzen 


Der Anwender hat drei Möglichkeiten, seinen Personalcomputer 
mit Software zu versorgen: Er kann selbst Programme entwickeln 
und den Computer als frei programmierbares Gerät nutzen - da- 
rauf sind wir im vorangehenden Abschnitt 1.3.7 eingegangen. Er 
kann aber auch fremde Software-Produkte kaufen: sei es in Form 


von individueller Software ‚ die (ent- 
sprechend teuer) genau nach seinen Vorgaben entwickelt wird, 
sei es in Form von Standard - Software, die 


zwar preisgünstiger ist, aber das Risiko birgt, die eigenen 
Organisationsstrukturen anpassen zu müssen. Als Kompromiß zwi- 
schen der kompletten Individuallösung und der standardisierten 
Allgemeinlösung versucht man, individuelle Software auf Stan- 
dardbasis zu entwickeln; dabei wird entweder über Programmge- 
neratoren bzw. Kommandosprachen programmiert oder über zwei 
logische Variablenebenen. 


1.3.8.1 Menügesteuerter oder kommandogesteuerter Dialog 


Beim Einsatz fremder Software muß der Benutzer sicher und kom- 
fortabel durchs Programm geführt werden, es kommt also auf die 
Benutzerführung an. Dabei bieten sich menü- und 
kommandogesteuerte Anwendungen an. 


Der Anfänger wird die Menüsteue rung schätzen; er 
wird über die ihm gerade zur Verfügung stehenden Eingabemög- 
lichkeiten - zum Menü zusammengefaßt - am Bildschirm jederzeit 
informiert, mehr noch: diese Möglichkeiten sind eingegrenzt, 
um den Benutzer relativ eng zu führen. Der Anfänger kann sich 
so ohne langes Handbuch-Studium an den Programmeinsatz wagen. 
Kennt er sich einmal im Programm aus, so wird der Weg durch 
Menüs und Menü-Ebenen allerdings auch als Hemmnis empfunden. 


Dann bietet sich die Kommandosteuerung über 
Kommandos an, die in einem Handbuch aufgelistet sind und vom 
Benutzer wahlfrei eingetippt werden können - mit dem Risiko 
entsprechender Fehlermeldungen natürlich. 


Gute Anwenderprogramme können beide Arten der Benutzerführung 
vorsehen: arbeitet der Benutzer fehlerlos, dann läuft das Pro- 
gramm kommandogesteuert ab, um bei häufiger auftretenden Feh- 
lern in einen menügesteuerten Ablauf zu wechseln. 

Oft werden auch zwei Bildschirm s e i t e n vorgesehen: eine 
Hauptseite mit dem eigentlichen Dialog sowie eine zusätzliche 
Hilfsseite mit Kommentaren und Texthilfen, zwischen denen der 
Benutzer jederzeit hin und her springen kann. 


Die Dialogsteuerung über Menü und Kommando ist bei der System- 
Software natürlich ebenso zu finden wie bei der Anwender-Soft- 
ware. So ist z.B. das Betriebssystem UCSD rein menügesteuert. 
Dies steht im Gegensatz zur Kommandosteuerung bei CP/M. 


1.3.8.2 Einige Programm-Qualitätsmerkmale 


Es soll hier kein Merkmalskatalog formuliert werden (dies auch 
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im Hinblick darauf, daß solche Merkmale für Software äußerst 
schwer meßbar sind), sondern einige praktikable Einzeltips: 


Wird Anwendersoftware zu einem (Turn - Key - Paket 
geschnürt verkauft, so startet das (Menü-)Programm automatisch 
sofort nach dem Einschalten des Computers (Programmladen sowie 
Betriebssystem-Kenntnisse sind dann nicht erforderlich). 


Beim Scro1l 1 ing rutscht der Bildschirminhalt um eine 
Zeile hoch, wenn der Cursor unten den Bildrand erreicht hat. 
Zum schnellen Durchblättern zusammenhängender Texte kann die- 
ses Durchrollen von Information vorteilhaft sein. Andernfalls 
wird man den Bildschirm abschnittsweise total löschen und oben 
am Bildschirm neu beginnen. 


Beim Screen Ed i t ing kann der Benutzer den Cur- 
sor an jede beliebige Bildschirmposition bewegen, um dort dann 
etwas zu korrigieren oder neu einzugeben. Der Bildschirm dient 
als Arbeitsblatt, -seite bzw. Formular. Sehr häufig bleibt am 
Bildschirmrand eine Menüzeile (auch Prompt- oder Systemzeile 
genannt) permanent stehen, um den Benutzer über Steuerungsmög- 
lichkeiten (Kommandos) und aktuelle Parameter (wie Zeilenlänge 
oder freien Speicherplatz) zu informieren. 


Die Zeichendarstellung darf nicht zu verwirrend sein. Häufige 
Invers - Felder (dunklere Schrift auf hellem Hin- 
tergrund) führen z.B. zu erhöhter Augenbelastung und sollten 
sparsam verwendet werden. 


Eine benutzerfreundliche Fehlerbehandlung muß 
al 1 e möglichen Fehler abfangen (Plausibilitätskontrollen). 


zur Sicherheit müssen Tasten, die zum Absturz füh- 
ren (z.B. ESC-Taste), gesperrt sein. Keine Eingabe, auch nicht 
die 'berühmte' Division durch Null, darf dabei zum Aussteigen 
führen (Deadlock-Situation), die ein Abschalten und Neustarten 
erforderlich macht. Zur Sicherheit zählt auch die Datenschutz- 
fähigkeit eines Programms. 


Die Zuverlässigkeit nimmt den sicher höchsten 
Rang ein: das raffinierteste Programm ist wertlos, wenn es die 
Aufgaben nicht zuverlässig löst. 


Der Software-Qualitätssicherung wird heute im Rahmen des Soft- 
ware-Engineering mehr und mehr Beachtung geschenkt. 


1.3.8.3 Vier kaufmännische Standard-Programmpakete 


Die vier Programme Tabellenkalulation, Textverarbeitung, Datei 
bzw. Datenbank und Grafik sind fast auf jedem Personalcomputer 
Standard - voneinander isoliert oder auch integriert. 


Tabellenkalkulationsprogramme als 
'Spread Sheets' bzw. "Ausgebreitete Papierbogen' übertragen 
alles das, was bislang mit Bleistift, Papier und Taschenrech- 
ner vorgenommen wurde, in den Hauptspeicher (abgelegt) und auf 
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den Bildschirm (gezeigt). Der Benutzer baut jedes Arbeitsblatt 
als Tabelle auf, kann in die Tabellenzeilen und -spalten nume- 
rische oder auch Textwerte eintragen und durch eine Vielzahl 
von Formeln verknüpfen. Bei 'Visicalc' als dem ersten größeren 
Kalkulationsprogramm werden die Tabellenelemente ähnlich dem 
Schachbrett (Namen A1,A2,A3,...) angesprochen; '"Multiplan' als 
jüngeres Konkurrenzprogramm von Microsoft ermöglicht dies mit- 
tels einfacher Cursor-Positionierung am Bildschirm. Arbeits- 
blätter können auf einem externen Speicher aufbewahrt werden. 
Tabellenkalkulationsprogramme lassen sich "zweckendfremden': 
Trägt man Text anstelle von Zahlen in die Tabelle ein, so kann 
leicht eine kleines Informationssystem realisiert werden. Ge- 
nauso sind Anwendungen zur Fakturierung, zum Bestellwesen, zur 
Bilanzierung usw. denkbar. Das Beiwort 'Kalkulation' verweist 
also eher auf die Ursprünge der Tabellenkalkulationsprogramme 
als auf deren heutige universellen Nutzungsmöglichkeiten. 


Textverarbeitungsprogramme für Per- 
sonalcomputer sind aus den Editoren entstanden, also aus den 
Programmhilfen zum Eingeben und Aufbereiten von Programmen am 
Bildschirm. Man hat sie zur Verarbeitung anderer Dokumente 
wie Briefen, Rechnungen, Manuskripten, Formularen usw. weiter- 
entwickelt. Damit treten sie in Konkurrenz zur Schreibmaschi- 
ne, zum Text-Automaten sowie zur Großrechner-Textverarbeitung. 
Die Textverarbeitung umfaßt die Teilprogramme Editor, Ausga- 
beformatierer und Verarbeitung; diese Programme können zu ei- 
nem Paket integriert oder getrennt sein. 
- Editor als Eingabe- und Bearbeitungsprogramm: 
Der Bildschirm wird ähnlich wie eine Lupe über den Text be- 
wegt bis zu einem Bildschirmausschnitt, der cursorgesteuert 
zu bearbeiten ist (verschieben, einfügen, kopieren, Rand 
ausgleichen usw.). 
- Formatierer zur Aufbereitung der Druckausgabe: 
Man unterscheidet die folgenden zwei Arten von Formatierern. 
Bei der ersten Art erscheint der Text am Bildschirm so, wie 
er später ausgedruckt wird. Bei der zweiten Art sind in den 
Bildschirmtext Befehle zur Steuerung des Druckformates ein- 
gefügt. Bei der ersten Art wird "gedruckt wie gezeigt'. oft 
ist dies aber kaum exakt einzuhalten (Beispiel: 120 Zeichen 
je Druckzeile; Bildschirmzeile 80 Zeichen; Ausgabe-Text aus 
mehreren Dateien). 
- Eigentliches Verarbeitungsprogramn: 
Dieses richtet sich nach den Anforderungen der unterschied- 
lichen Benutzer wie Sekretärin, Abteilungsleiter, Schrift- 
steller, Schriftsetzer. Textbausteine als häufig vorkommen- 
de Textteile speichern, Serien- sowie Ganzbriefe erstellen, 
Formulararbeiten, Textdateien anlegen, Autorenkorrektur usw. 


Nach den Programmen zur Tabellenkalkulation und Textverarbei- 
tung nun zur Datei / Datenbank , deren Grund- 
lagen bereits in Abschnitt 1.3.5 dargestellt wurden. 

Die kommerziellen Programm-Pakete hierzu werden unter den un- 
terschiedlichsten Bezeichnungen angeboten, z.B. als Dateiver- 
waltung, Datenmanager, Datenbankmeister, Datenbank-System oder 
schlicht als Datei-System. Da solche Begriffe kaum etwas aus- 
sagen, ist es sinnvoll, einzelne Eigenschaften dieser oft als 
"wir-können-alles-Programme" angepriesenen Software-Produkte 
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wie folgt zu überprüfen: 

- Dateiaufbau: 
Anzahl der gleichzeitig geöffneten Dateien? Satzanzahl einer 
Datei? Anzahl der Datenfelder je Satz? Feste Satzlänge? Da- 
tentypen? Maximale Feldlänge? Maximale Dateigröße? Eine Da- 
tei auf mehreren Disketten? 

- Systemverwaltung: 
Schnittstelle zu höheren Programmiersprachen? In Mehrplatz- 
Umgebung einsetzbar? Abfragesprachen, Listen- bzw. Programm- 
generatoren? Dynamische Dateiverwaltung? Kompatibilität zu 
anderen Dateien (z.B. aus Textverarbeitung)? Datensatzaufbau 
nachträglich änderbar? Implementierungen für welche Mikros? 
Datei-Sicherheitskopien leicht erstellbar? Daten nach Lösch- 
en wiederherstellbar? Datenschutz durch Datei- bzw. Satzpaß- 
wort? Realisierung als Datenbankmaschine? 

- Speicherung: 
Aufwand zum Neueinrichten der Datenbank? Cursorsteuerung? 
Datenprüfung bei Eingabe? Daten aus anderen Dateien kopier- 
bar? Speicherung satz-, block- oder dateiweise? Eingabefeh- 
lerkorrektur möglich? Ablegen als Binärdatei oder Textdatei? 

- Zugriff: 
Zzugriffsmodus direkt oder indirekt? Anzahl der Suchbegriffe? 
Schlüssel aus einem oder mehreren Datenfeldern bestehend? 
Sortierbegriffe für wieviele Datenfelder? Sortierprogramme? 
Index intern als Tabelle? Möglichkeiten zur Datenausgabe? 
Ausgabeeinheiten für Listen? Zwischensummenbildung in Lis- 
ten möglich? 


zum Grafikprogramm als viertem Standard-Paket: 
Programme dieser Kategorie erlauben es, Kuchen-, Säulen- sowie 
Liniengrafiken menügesteuert über einen hochauflösenden Bild- 
schirm und z.B. einen Matrixdrucker mit Einzelpunktansteuerung 
zu erstellen und auszugeben. Die Skalierung der Bilder kann im 
Dialog festgelegt werden. Oft können dreidimensionale Grafiken 
bzw. räumliche Formen erzeugt werden. Gerade für kommerzielle 
Veranschaulichungen sind Grafikprogramme mit den statistischen 
Grundfunktionen von Vorteil. 

Ein Grafikprogramm kann nur dann sinnvoll genutzt werden, wenn 
man Daten aus anderen Programmen übergeben kann. Wir kommen so 
zur Frage der Verbindung bzw. Kompatibilität dieser Programme. 


Sollen Tabellenkalkulation, Textverarbeitung, Datenbank sowie 
Grafik nicht isoliert, sondern als eine Einheit genutzt werden, 
müssen entsprechende Schnittstellen zu den Programmen gegeben 
sein. Zur Verbindung dieser Programme ein Beispiel: 

In einem Tabellenkalkulationsprogramm verknüpft man Zahlen, um 
diese dann an ein Grafikprogramm zwecks Diagrammdarstellung zu 
übergeben. Anschließend wird über das Textverarbeitungspro- 
gramm ein Bericht verfaßt, in den diese Zahlen als Tabelle wie 
auch als Diagramm bildlich eingebunden sind. Schließlich kann 
man die Teile dieser Arbeit über das Dateiprogramm extern und 
langfristig speichern. 

Wie können die vier Programme nun verbunden werden? Zum Bei- 
spiel über Textdateien (alle Zeichen als Text im ASCII-Code 
dargestellt) als gemeinsamer Schnittstelle. Die Steuerung kann 
über ein übergeordnetes Menüprogramm erfolgen, das die einzel- 
nen Programme aufruft und den Datenaustausch überwacht. 
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1.3.8.4 Teillösung und Gesamtlösung im Betrieb 


wird ein Personalcomputer im kleineren Betrieb als Allzweck- 
System eingesetzt, dann sicher mit dem (Fern-)Ziel, sämtliche 
betrieblichen Funktionen wie Materialwirtschaft, Betriebsab- 
rechnung, Finanzbuchhaltung, Personalwesen sowie Auftragsbear- 
beitung über e i n Software-Paket zu bearbeiten: man spricht 
dabei von "integrierter DV' (vgl. Abschnitt 1.3.5.5). Auf dem 
weiten Weg zu einer solchen Gesamt1lö6ösung wird man 
zunächst als Te i 116 sung einzelne Funktionen auf die 
DV übernehmen: So die Fakturierung der Ausgangsrechnungen mit 
Kunden-, Artikelstamm- und Offene-Posten-Datei, die später in 
die Auftragsbearbeitung integriert werden kann. Oder als wei- 
tere Teillösung das Personalwesen mit Lohn- und Gehaltsabrech- 
nung mit der späteren Anbinlung zur Finanzbuchhaltung mit Kre- 
ditoren-, Debitoren- und Sachbuchhaltung. 


BUCHHALTUNG: PERSONALWESEN: 
Kreditoren, Debitoren, Stammdatenverwaltung, 
Sachkontenverwaltung, Monatsgehalt, 

Offene Posten, Bilanz, -—  Überweisungsträger, 
Erfolgsrechnung, ... SER a Nachweislisten, ... 
MATERIALWIRTSCHAFT: BETRIEBSABRECHNUNG: 
Permanente Inventur, Nachkalkulation, 
Lagerbestandsführung, Umsatzstatistik, 


Bestellwesen, ... Kostensätze, ... 





AUFTRAGSBEARBEITUNG: 
Auftragsverwaltung, 
Erfassung, Rückstände, 
Fakturierung, ».. 


Integrierte Datenverarbeitung als Ziel 


Anwender-Software, die eine integrierte Bearbeitung aller in- 
nerbetrieblichen Vorgänge ermöglichen soll, wird immer häufi- 
ger als Branchen 1 6ös ung angeboten. Diese ist auf 
eine bestimmte Branche gerichtet. Beispiele: Handwerksbetrieb, 
Rechtsanwaltskanzlei, Immobilienfirma, Großhandel, vVersicher- 
ung, Zahnarztpraxis, Einzelhandel, Leasing oder Vertreter. 


1.3.8.5 Nicht nur am Rande: Spielprogramme 


"Immerhin noch besser als das n u r passive Fernsehen" - so 
wird das Vordringen der "Arcade-Games' genannten, computerge- 
steuerten Spiele von der Spielhalle ins Wohnzimmer sehr häufig 
kommentiert. 

Gespielt wird mit reinen Spielautomaten ('rein', weil sie aus- 
schließlich zum Spielen da sind; "Automat', da sie nicht frei 
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programmierbar sind und deswegen strenggenommen auch nicht als 
Computer bezeichnet werden dürfen) oder mit Personalcomputern, 
die auch hardwaremäßig durch Steuerknüppel (Joystick), Auslö- 
setaste, Lichtgriffel usw. entsprechend ausgestattet sind. Ge- 
rätehersteller und spezialisierte Softwareproduzenten teilen 
sich den Markt. Angeboten werden die Spielprogramme dabei auf 
Einsteckmodul (Firmware) und auf Kassette wie Diskette (Soft- 
ware). Die vom Hersteller programmierten ROM-Moduln sind sehr 
einfach zu bedienen (Modul in den Schacht stecken und Programm 
starten) und vom Benutzer nicht zu kopieren. Da immer häufiger 
kommerziell genutzte Personalcomputer zum Spielen benutzt wer- 
den, wird das Spielangebot auf Kassette und Diskette bestimmt 
nicht abnehmen. 


Gemeinsam mit und gegen den Computer kann auf unterschiedliche 
Weise gespielt werden: 
- Geschicklichkeitsspiele: 
Übernahme altbekannter Spiele auf den Computer. 
- Neue Spielarten: 
Spiele wie Pac Man und Pillenfresser sind erst durch den 
Computer möglich geworden (Bewegung, hochauflösende Grafik). 
- Abenteuerspiele: 
Von der Wirklichkeit in die Phantasiewelt am Bildschirm. 
- Simulations- und Rollenspiele: 
Modellbildung der Wirklichkeit; Planspieltechnik. 
- Spezielle Kinderspiele: 
... auch Mickey Mouse und Sesamstrasse. 
- Schachspielprogramme: 
Schon weniger als 'Spielzeug' abzutun. 
- Lehr- und Lernspiele: 
Fremdsprachen erlernen, naturwissenschaftliche Experimente, 
Computer-Unterstützter Unterricht (CUU), ... 


Bleiben die Unterhaltungsspiele, die weder die Kreativität an- 
regen noch das Denkvermögen fordern, weiter d i e Verkaufs- 
schlager? 

Werden in Zukunft auch die Lehr/Lernspiele nachgefragt? 

wird der Computer als "perfekter Gespiele" den Menschen als 
"menschlich nicht-perfekten Spielpartner" noch mehr verdrängen 
können? 

In jedem Falle positiv: ganz im Gegensatz zum Konsumieren ist 
das Entwerfen und Programmieren neuer Spielprogramme ein sehr 
anregendes und kreatives Unterfangen. 


1.4 Firmware = halb Hardware + halb Software 


Als Firmware (feste Ware) hatten wir alle Information 
bezeichnet, die an der Nahtstelle zwischen Hardware und Soft- 
ware in computerverständlicher Form gespeichert vorliegt (vgl. 
Abschnitt 1.1.1). Speichermedium für Firmware ist der ROM als 
Festwert-Speicher. Für den ROM-Hersteller, der Information in 
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den ROM speichert, handelt es sich dabei um Software; für den 
Benutzer dagegen, der den ROM z.B. als Steck-Modul kauft, sind 
die Daten und Programme wie Hardware, da er sie nur anwenden 
(=lesen), nicht aber verändern (=beschreiben) kann. 


1.4.1 IC als Integrierter Schaltkreis 


Beim Öffnen des Gehäuses eines Personalcomputers entdeckt man 
in jedem Fall vier Teile: 


- Ein Netzteil bzw. Transformator als großes Teil zur Strom- 
versorgung. 

- Platinen als Leiterplatten, auf denen Schaltkreise (Chips) 
montiert sind. 

- Verbindungsleitungen 

- Stecker als Schnittstellen zum Kontakt mit der "Außenwelt' 


wichtig sind die Chips. Ein Ch ip ist ein kleines Plätt- 
chen aus Silizium, auf das im Zuge der Herstellung bestimmte 
Schaltelemente zu einer untrennbaren Einheit eingeschmolzen 
bzw. integriert werden. Deshalb bezeichnet man den Chip auch 
als Integrierten Schaltkreis mit der 
Abkürzung IC für "Integrated Circuit'. Genaugenommen schmelzt 
man auf einen Chip mehrere Schichten aus jeweils verschiedenen 
Stoffen ein, deren Strukturen dann ein Verhalten ergeben, das 
einem Transistor, Kondensator, Widerstand usw. entspricht. 


I te ri einer 3 2 ha Ltr et 
(IC, Chip, Baustein, Stein, 'Modul') 


LOGIK-BAUSTEIN SPEICHER-BAUSTEIN 


= aktiver Baustein = passiver Baustein 
Mikroprozessor Speicher ROM Speicher RAM: 
Funktionen von Hersteller hat Hersteller hat 
Steuer- und Information fest Baustein ohne 
Rechenwerk auf eingeschmolzen Inhalt gefertigt 
einem Chip 

integriert 


zumeist Programme | 


|Programme | 





und Daten 


Anwender kann Anwender kann 
nur lesen lesen/schreiben 





Zwei grundsätzliche Verwendungsmöglickeiten von ICs 


Das Siliziumplättchen als Trägerkristall ist stets in ein Ge- 
häuse mit z.B. 16 Füßen (Pins) als Anschlüsse eingebaut. 
Je nach Anordnung der Bauelemente kann man einen Chip als Lo- 
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gikbaustein oder als Speicherbaustein verwenden: 

wird ein Chip als aktiver Baustein zur Ausführung von Befehlen 
verwendet, dann nennt man den Chip Logikbaustein 

(weil nach einer bestimmten Ablauflogik vorgegangen wird) oder 
kurz Mikroprozessor. Der erste Mikroprozessor 
wurde 1970 auf den Markt gebracht. 

Der Chipals Speicherbaust ein zur Speicherung 
von Daten und Programmen wurde erst später entwickelt. Zwei 
Speicherarten unterscheidet man: Bei dem mehrfach erwähnten 
Speicher ROM (Read Only Memory) als Nur-Lese-Speicher kann der 
Benutzer nur lesen, da die Programme als Firmware fest im ROM 
gespeichert sind. Im Gegensatz dazu ist der Speicher RAM (Ran- 
dom-Access-Memory) ein Schreib-Lese-Speicher, d.h. ein Direkt- 
Zugriff-Speicher. Hauptspeicher von Personalcomputern sind als 
RAM-Speicher ausgebildet und nehmen das Anwenderprogramm sowie 
die zu verarbeitenden Daten auf. 


1.4.2 Prinzipieller Aufbau eines Mikrocomputers 


Ein Mikro- bzw. Personalcomputer ist im Prinzip genauso aufge- 
baut wie jeder andere Computer (vgl. Abschnitt 1.2.2.1), nur 
sind die Internspeicher als Speicher RAM bzw. ROM ausgebildet 
und die CPU als Mikroprozessor (der Prozessor besteht aus der 
ALU (Arithmetic Logic Unit bzw. Rechenwerk), dem Leitwerk und 
Registern als Speichereinheiten). Ein I/O - Baustein regelt 
den Datenaustausch mit den jeweiligen Ein-/Ausgabegeräten, 
ein Datenbus die Übertragung von Daten (Ziffern, Buchstaben 
ben und Befehlen) und ein Adreßbus die Übertragung von Spei- 
cherplatzadressen. 

Der Mikrocomputer hat Interne Speicher RAM und ROM (als Haupt- 
speicher, Arbeitsspeicher, Memory oder Kurzzeitgedächtnis be- 
zeichnet) einerseits und Externe Speicher wie z.B. eine Dis- 
ketteneinheit ändererseits. Deshalb unterscheidet man zwischen 
dem internen und dem externen Datenbus: Über den internen 
Datenbus werden Daten zwischen der ALU, dem Leitwerk, den Re- 
gistern und den Speichern RAM und ROM transportiert, während 
der externe Datenbus die Datenübertragung zu den Externspei- 
chern übernimmt, also zu einer Diskette oder einer Hard Disk. 
Entsprechend gibt es auch einen internen und einen externen 
Adreßbus. 


BUS: Datenbus, Adreßbus 






speicher Ispei | (Externe 


RAM : | — > Speicher) 

— - Ö 
Rechen- Anwender- vorge- Peripherie: Tastatur, Bild- 
(ALU), programm gebene schirm, Diskette, Kassette, 


Leitwerk und Daten Programme Festplatte, ... 


Aufbaumodell eines Mikro- bzw. Personalcomputers 
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Wie läuft nun ein Programm ab? Nach dem Start schickt der Mi- 
kroprozessor über den Adreßbus die Adresse des 1. Programmbe- 
fehls an den Speicher, in dem sich das Programm befindet. Dann 
transportiert der Speicher den unter dieser Adresse gefundenen 
Befehl über den Datenbus an den Mikroprozessor. Nach Aus- 
führung des Befehls schickt dieser wiederum die Adresse des 2. 
Programmbefehls an den Speicher usw. 


1.4.3 Typen von Mikrocomputern 


Es gibt Mikroprozesoren mit 8-, 16- und 32-Bit-Struktur. Da 
der Mikroprozessor als "Herz des Computers" die Computereigen- 
schaften entscheidend prägt, unterscheidet man auch für Mikro- 
computer diese drei Typen. 


1.4.3.1 8-Bit-Mikrocomputer 

"Das ist ein BB - Bit - Computer". Damit ist ein 
Computer mit einem 8-Bit-Mikroprozessor bzw. einer 8-Bit-CPU 
gemeint. Die 8 Bit als Wortbreite des Prozessors kann als ele- 
mentarer Denkinhalt des Computers aufgefaßt werden. Warum? Der 
Datenbus transportiert Daten und Befehle und besteht aus 8 pa- 
rallelen Leitungen. Übertragen wird zeichenweise: der Buch- 
stabe "K" wird im ASCII-Code als 01001011 (1. Leitung 1, 2. 
Leitung 1, 3. Leitung 0, ...) durch den Datenbus gesendet. Mit 
den 8 Bits bzw. den 8 Leitungen des 8-Bit-Datenbus können also 
genau 256 (gleich 2 hoch 8) Zeichen vom Computer unterschieden 
werden. Für die Verarbeitung im ASCII-Code ist diese Zahl von 
256 gerade passend. Es genügt, 256 verschiedene Zeichen unter- 
scheiden zu können. 


Beim Adreßbus sieht dies anders aus: Durch diesen Bus gelangen 
nicht die Daten selbst, sondern deren Hausnummern bzw. Adres- 
sen, unter denen sie im Speicher abgelegt sind (jeder Speicher 
ist fortlaufend durchnumeriert mit Speicherplatz 1, Speicher- 
platz 2, Speicherplatz 3, ...). Damit bestimmt die Anzahl der 
Adreßbus-Leitungen die Anzahl der Speicherplätze, die der Com- 
puter unterscheiden bzw. adressieren kann. Ein 8-Bit-Adreßbus 
kann nur 256 Speicherplätze direkt adressieren. Da dies viel 
zu wenig ist, verwenden die gängigen 8-Bit-Mikroprozessoren in 
der Regel einen Trick: Sie bauen Adressen aus zwei Bytes auf, 
die nacheinander über den Adreßbus zum Hauptspeicher geschickt 
werden. Damit können diese 8-Bit-Computer dann genau 65536 
(2 hoch 16) Zeichen bzw. Bytes anwählen und auch adressieren 
(65536 Bytes = 64 mal 2 hoch 10 = 64 KBytes = kurz 64 K). Dies 
gilt für die beiden weitverbreiteten 8-Bit-CPUs 280 und 6502. 


1.4.3.2 16-Bit-Mikrocomputer 


Die Wortbreite des externen Datenbus bestimmt, ob man einen 
8-Bit-Computer oder aber einen 16-Bit-Computer vor sich hat, 
nicht aber die interne Länge von Registern, die Wortbreite des 
Rechenwerks oder die Befehlslänge. Danach verfügt ein "echter' 
16 - Bit - Computer über einen internen wie auch 
einen externen 16-Bit-Bus. 
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Wenn Personalcomputer wie Sirius 1 oder IBM-PC häufig als 16- 
Bit-Computer bezeichnet werden, dann muß man sich darüber im 
klaren sein, daß die dabei verwendete CPU 8088 zwar 16-Bit-Re- 
gister und Operationen zur Verarbeitung von 16-Bit-Worten auf- 
weist, also einen internen 16-Bit-Bus hat, aber nur einen ex- 
ternen 8-Bit-Bus. Dies bedeutet, daß die 16 Bits der Register 
zum Ausgeben wie zum Laden durch den Datenbus stets halbiert 
bzw. zusammengefügt werden müssen. 

Geräte mit externem 8-Bit-Bus und internem 16-Bit-Bus bezeich- 
nen wir als 8/16 - Bit - Computer. Aufgrund ih- 
rer Stellung zwischen der echten 8-Bit-Struktur und der echten 
16-Bit-Struktur bezeichnet man sie häufig als "'Zwitter'. 


Warum kann ein 16-Bit-Computer nun schneller arbeiten als ein 
8-Bit-Computer? 

Der Bus eines 8-Bit-Computers hat 8 parallele Leitungen. Damit 
können die (2 hoch 8 gleich) 256 Zahlenwerte 0,1,2,...,255 in 
ei ne m Schritt bzw. Zeittakt übermittelt werden. Will man 
größere Zahlen übertragen, müssen diese aufgeteilt und in zwei 
oder mehreren Schritten transportiert werden. Dieses Aufteilen 
kostet natürlich Zeit. 

Dies erübrigt sich beim 16-Bit-Computer, wenn die Zahlenwerte 
0,1,2,...,65535 übermittelt werden sollen. Der 16-Bit-Bus mit 
16 Leitungen erlaubt (2 hoch 16 gleich) 65536 Kombinationen 
bzw. Zahlenwerte, die in e ine m Schritt übermittelt wer- 
den. 

Der Unterschied zwischen 8-Bit-Computern und 16-Bit-Computern 
ist also viel größer als es der Zahlenvergleich "8 zu 16 Bit" 
nahelegt: die Hochrechnungen und damit verbunden der Zahlen- 
vergleich "256 zu 65536 Kombinationen" zeigen den wahren Un- 
terschied zwischen diesen Computertypen. 


1.4.3.3 32-Bit-Mikrocomputer 


Das Leistungsvermögen eines Computers hängt im wesentlichen 
von zwei Größen ab: von der Anzahl der Bits (Wortbreite) und 
von der Schnelligkeit. 32-Bit-Computer weisen bei beiden Grö- 
ßen günstige Werte auf. Zunächst zur Bitanzahl: 

Bei den echten 32-Bit-Computern sind 32 parallele Leitungen im 
Bus zusammengefaßt. Damit vergroßert sich ihr Adreßraum theo- 
retisch auf vier Milliarden Zeichen (vier Gigabytes). Außerdem 
können Computer mit 32-Bit-Struktur binäre Zahlen anstatt auf 
acht Stellen (beim 8-Bit-Mikro) auf 32 Binärstellen genau be- 
arbeiten. Der Befehlsvorrat nimmt ebenfalls zu: die 8-Bit-CPU 
des 6502 versteht 56 Befehle gegenüber den 134 Befehlen des 
16-Bit-Prozessors 8086 und den 230 Befehlen des 32-Bit-Compu- 
ters HP Focus von Hewlett-Packard. 


Die Schnelligkeit eines Computers gibt man in "Millionen In- 
struktionen je Sekunde" (Mips) an. Sie hängt von der Taktfre- 
quenz und von den Abmessungen des Prozessor-Chips ab (je klei- 
ner die Abstände der Leiterbahnen auf der Prozessor-Platine, 
desto höhere Taktfrequenzen und damit Instruktionen je Sekunde 
sind möglich). Die 32-Bit-CPU 32032 soll 1,1 Mips ermöglichen. 
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1.4.4 Generationen von Mikroprozessoren 


Die bislang angeführten Mikroprozessor-Kürzel Z80, 6502 sowie 
8088 können leicht in eine etwas übersichtlichere Ordnung ge- 
bracht werden, da es im Grunde nur zwei "Familien" von 8-Bit- 
Prozessoren gibt: die 80-Familie und die 65xx- bzw. 68xx-Fami- 
lie. 1970 erfand Dr. Ted Hoff bei Intel mit dem 4004 den 4-Bit 
Mikroprozessor, 1973 folgte der 8080 als 8-Bit-CPU. Seit 1976 
gelten der 280 von Zilog und der 6502 von Motorola als haupt- 
sächliche Vertreter der nach ihnen benannten Familien. Bereits 
1979 war der 6502 der weltweit meistverkaufte Mikroprozessor. 
Sein Nachfolger 68000 weist als 16-Bit-Mikroprozessor bereits 
einen 16-Bit-Datenbus bei intern 32-Bit-breiten Registern auf, 
er zählt also zu den "'Zwittern' mit 16/32-Struktur. 


Prozessor: Bits: Adressen: Befehle: Hersteller: Seit: 
280 8 256 B 158 zZilog 1976 
6502 8 256 B 56 MOS-Tech. 1977 
2800 8/16 16 MB 183 zilog 1983 
8088 8/16 64 KB 134 Intel 1973 
iAPX 188 8/16 1 MB 35 Intel 1982 
8086 16 1 MB 134 Intel 1978 
28000 16 64 KB 110 zilog 1981 
iAPX 286 16 16 MB 111 Intel 1982 
iAPX 186 16 1 MB 95 Intel 1982 
MC 68000 16/32 16 KB 56 Motorola 1979 
NS 16032 16/32 16 MB 86 Nat.Semi. 1982 
MC 68010 16/32 16 MB 58 Motorola 1982 
HP Focus 32 500 MB 230 Hewlett-P. 1981 
NS 32032 32 16 MB 190 Nat.Semi. 1983 
iAPX 386 32 32 MB 111 Intel 1984 
MC 68020 32 256 MB 200 Motorola 1984 


8/l6 = externer 3-Bit-Bus und interner 16-Bit-Bus (Zwitter) 
16 = externer wie interner 16-Bit-Bus (echte 16 Bit-Struktur) 


Einige weitverbreitete Mikroprozessoren 


Es gibt Personalcomputer, die zwei Mikroprozessoren aufweisen, 
um sowohl auf 8-Bit-Software als auch auf 16-Bit-Software zu- 
greifen zu können. Ein Beispiel: ein 280 als 8-Bit-CPU führt 
Programme für das Betriebssystem CP/M-80 aus und ein 8088 als 
16-Bit-CPU verarbeitet Programme unter CP/M-86. 


1.4.5 Mikrocomputer und ihre Mikroprozessoren 


Im Jahr 1984 verteilen sich die auf dem Markt verwendeten Pro- 
zessoren wie folgt: 

60 Prozent 8-Bit-Prozessoren, 20 Prozent 16-Bit-Prozessoren, 
ein Prozent 32-Bit-Prozessoren und ungefähr je 10 Prozent als 
Zwitter mit 8/16-Bit-Prozessoren bzw. 16/32-Bit-Prozessoren. 
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Bit-Struktur: Prozessor: Mikrocomputer z.B.: 





ö 5502 Apple IIe, CBM 8032 

8/16 8088 IBM-PC/XT, IBM PCjr, Sirius 1, 
16 8086 Sirius Vicki, ITT 3030, Duet16 
16 28000-8001 Olivetti M20, Zilog 8000 

16/32 MC68000 Apple Lisa, Fortune 32:16 

16/32 NS 16032 Nat.Semi.DB16000, ACORN-BBC 
32 HP Focus Hewlett Packard 9000 


Einige Mikrocomputer und ihre Prozesoren 


1984 besteht eine 32-Bit-Softwarelücke. Entscheidend ist, daß 
32-Bit-Software abwärts-kompatibel gestaltet wird, um auch auf 
Computern mit externem 16-Bit-Bus oder 8-Bit-Bus eingesetzt 
werden zu können. 


1.4.6 EPROM als löschbarer Speicher 


Benutzer von Mikrocomputern werden zuweilen in 'Löter' und in 
'Tipper' eingeteilt: Bauen sich die 'Löter' ihr DV-System aus 
elektronischen Bausteinen hardwaremäßig individuell zusammen, 
so erwerben sich die 'Tipper' einen Computer, um diesen selbst 
zu programmieren (Programm-Tipper) oder gekaufte Software auf 
die eigenen Daten anzuwenden (Daten-Tipper). Die zwei folgen- 
den Entwicklungen verwischen diese Einteilung in 'Löter' sowie 
in 'Tipper' immer mehr: 


Zum einen werden EPROMs als löschbare Speicher immer einfacher 
in der Handhabung, wodurch es auch für die 'Tipper' leichter 
wird, die bislang dem "'Löter' vorbehaltene Arbeiten durchzu- 
führen. 

Ein EPROM (Erasable Programmable Read-Only-Memory) als lösch- 
barer und sodann wieder programmierbarer Festwertspeicher ROM 
ist zwischen den RAM und den ROM einzuordnen. Legt man ihn un- 
ter UV-Licht und bestrahlt den unter einem kleinen Fenster an- 
gebrachten IC, so wird die gespeicherte Information gelöscht. 
Aus diesem Grunde muß ein EPROM stets mit einem undurchsichti- 
gen Fensteraufkleber versehen sein. Umgekehrt können über ein 
Programmiergerät neue Daten und Programme in den EPROM gespei- 
chert werden. Da EPROMs direkt bus-kompatibel sind, d.h. die 
Ausgänge sich direkt an den Datenbus legen lassen, ist dieses 
Vorhaben nicht nur für die 'Löter' interessant. Auch der 'Tip- 
per' kann so seine eigenen Programmentwicklungen leicht in ei- 
nen Festwertspeicher laden. 


Zum anderen können kommerzielle Programme ebenfalls über ein 
EPROM kopiert werden. Ein Beispiel: Der 'Tipper' geht mit sei- 
ner Romox-EPROM-Kartusche in einen Software-Laden, sucht ein 
Programm aus, läßt sich eine Kopie dieses Programms über ein 
im Software-Laden befindliches Gerät in seine EPROM-Kartusche 
laden (Gebühr 5-10 DM), geht nach Hause, steckt die Kartusche 
in seinen Computer und läßt das Programm laufen. Später kann 
er bei Bedarf dann immer wieder ein anderes Programm in den 
EPROM hineinkopieren. 


2 

Einstieg in die 

BASIC- 
Programmierung 

des Commodore 16, 
Commodore 116 

und Commodore 


plus/4 | 





2 Einstieg in die BASIC-Programmierung 75 


Zum vorliegenden Kapitel 2: 


Programmiersprachen : 

Auf Commodore-Computern laufen zahlreiche Programmiersprachen 
wie z.B. Assembler, BASIC, Pascal und LOGO. 

In diesem Buch wenden wir uns ausschließlich der Programmier- 
sprache BASIC zu. 


BASIC - Versionen: 

BASIC stellt keine einheitlich vereinbarte bzw. normierte Pro- 
grammiersprache dar, sondern ist in zahlreichen Versionen ver- 
breitet. 

Die für Commodore-Computer wichtigsten BASIC-Versionen tragen 
die Bezeichnungen 2.0, 4.0 und 3.5: 


- BASIC 2.0 Exakte Bezeichnung "Commodore 64 BASIC V2"; 
BASIC des Commodore 64 sowie der Commodore- 
Serie 2000 (z.B. des "guten alten PET'). 


- BASIC 4.0 BASIC der Commodore-Serien 4000, 8000 und 
deren Nachfolger x00. 


- BASIC 3.5 BASIC des Commodore 16, Commodore 116 und. 
des Commodore plus/4. 


BASIC 2.0: 

Die Standardsprache des Commodore 64 ist das BASIC 2.0, das 
in einem Festwertspeicher ROM untergebracht ist und deshalb 
auch als ROM-BASIC bezeichnet wird. 


BASIC 4.0: 

Bei dieser Programmiersprache handelt es sich um die Sprache, 
die auf den größeren Computern von Commodore standardmäßig ab- 
gerufen werden kann: insbesondere auf den Computern der Serien 
4000 und 8000. 

Der wichtigste Unterschied zum BASIC 2.0 besteht darin, daß in 
BASIC 4.0 der Zugriff auf Disketten-Dateien sehr komfortabel 
unterstützt wird. 

BASIC 4.0 ist auch für andere Mikrocomputer als Zusatz verfüg- 
bar - zumeist softwaremäßig, also nicht als ROM-BASIC, sondern 
als Disketten-BASIC. Das bedeutet, daß BASIC 4.0 nicht sofort 
nach dem Einschalten dieser Computer da ist, sondern erst von 
einer Systemdiskette in den RAM bzw. Arbeitsspeicher geladen 
werden muß. 
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BASIC 3.5: 
Nach BASIC 2.0 und BASIC 4.0 kam die Version BASIC 3.5 heraus. 
BASIC 3.5 istals Standardsprach e der Computer 


- Commodore 16 
- Commodore 116 
- Commodore plus/4 


in einem Festwertspeicher ROM gespeichert. Deshalb steht uns 
das BASIC 3.5 unmittelbar nach dem Einschalten dieser Computer 
zur Verfügung. 

In zahlreichen Punkten geht BASIC 3.5 über den Befehlsvorrat 
von BASIC 4.0 hinaus: insbesondere bei Strings, Musik, Grafik 
und der Ablaufsteuerung. 


In diesem Buch: "BASIC = BASIC 3.5" 

In diesem Buch programmieren wir ausschließlich in BASIC 3.5. 
Mit BASIC (ohne weiteren Zusatz) bzw. Commodore-BASIC ist der 
Befehlsvorrat von BASIC 3.5 als der Standardsprache des Commo- 
dore 16, Commodore 116 und Commodore plus/4 gemeint. 


Bezeichnung der Computer: 

Wenn im folgenden von "Commodore' gesprochen wird, dann sind 
damit die drei Computertypen Commodore 16, Commodore 116 und 
Commodore plus/4 gemeint. 


Vorgehensweise: 

Das vorliegende Kapitel 2 des Buches ist in die Abschnitte 2.1 
bis 2.4 untergliedert. 

In Abschnitt 2.1 wollen wir uns mit Tastatur und Bildschirm 
unseres Commodore vertraut machen. Über die Tastatureingabe 
können wir dem Personalcomputer (kurz: PC) etwas mitteilen, 
worauf der PC über die Bildschirmausgabe antwortet. Auf diese 
Weise wird ein direkter Dialog zwischen uns und 
dem PC möglich. 

In Abschnitt 2.2 erstellen wir das erste Programm 
auf dem Commodore. Als Programmierspache werden wir BASIC ver- 
wenden, genauer: "COMMODORE BASIC V3.5". Das Programm wird auf 
Diskette bzw. Floppy abgespeichert. 

In Abschnitt 2.3 beschreiben wir die Anweisungen und Daten der 
Sprache BASIC, wie sie auf dem Commodore 16, 116 sowie plus/4 
erfügbar ist. 

In Abschnitt 2.4 gehen wir auf die Lauffähigkeit dieser Pro- 
gramme auf den anderen Computertypen von Commodore ein. 


In Abschnitt 2.5 erklären wir, wie man von BASIC aus die im 
Commodore plus/4 fest eingebauten Programme (häufig auch als 
Built-In-Software bezeichnet) zur Ausführung bringen kann. 
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2.1 Direkter Dialog über Tastatur und Bildschirm (Direkt-Modus) 


Nach dem Einschalten des Commodore (genauer: des Commodore 16, 
Commodore 116 oder des Commodore plus/4) und des Bildschirmes 
(normales Fernsehgerät oder spezieller Monitor) erscheint am 
Bildschirm die folgende Meldung: 


COMMODORE BASIC V3.5 12277 BYTES FREE 
READY. 
C 


Im Hauptspeicher RAM (Random Access Memory für Direktzugriff- 
Speicher) mit insgesamt ca. 16000 Zeichen (K für Kilo = 1000) 
Speicherplatz stehen uns genau 12277 Zeichen Speicherplatz zur 
Verfügung (für jedes Zeichen ein Byte wie z.B. Byte "01001101" 
für das Zeichen "M"). Wir können also Daten und Programme bis 
zu einer Größe von 12277 Zeichen im Hauptspeicher ablegen. Mit 
dem READY. als dem Bereitschaftszeichen (Prompt-Zeichen) des 
Commodore wird uns gemeldet, daß der Computer für weitere Ein- 
gaben bereit ist (ready für bereit). Unter dem READY. blinkt 
der Cursor (oben mit "C" abgekürzt): an der Stelle des 
Cursors erscheint das Zeichen, das wir als nächstes eintippen. 


Zu den "12277 BYTES FREE": 

Diese Angabe bezieht sich auf die Computertypen Commodore 16 
und Commodore 116. Beim größeren Commodore plus/4 erscheint 
60671BYTES FREE; im RAM sind also ca. 60 KBytes frei. 


2.1.1 Rechnen im direkten Dialog 


Wir wollen den Commodore zunächst als Tischrechner nutzen und 
100+3 ausrechnen lassen. Dazu tippen wir ein: 


PRINT 100+3 J/RET/ 


Nach dem Tippen von 100+3 drücken wir die RETURN-Taste. Die 
Schreibweise /RET/ steht also für "RETURN-Taste einmal kurz 
drücken". Der Commodore antwortet mit 103 als Ergebnis und 
meldet sich wiederum mit READY. , daß er für weitere Eingaben 
bereit ist. Am Bildschirm erscheint der folgende Dialog: 


PRINT 100+3 J/RET/ (=Eingabe von uns) 

103 (=Ausgabe des Computers) 

READY. (=Ausgabe: Bereitschaftszeichen) 
C (=Ausgabe: C für "Cursor blinkt') 


Die PRINT-Anweisung dient hier der Ausgabe von Rechenergebnis- 
sen (print für drucken, ausgeben bzw. am Bildschirm zeigen). 
Probieren wir einige Rechenoperationen aus: 


PRINT 100.5%-3 /RET/ (=Eingabe: 100.5 mal -3) 
-301.5 (=Ausgabe einer negativen Zahl) 
READY. 
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PRINT 100/3 (=Eingabe: 100 dividiert durch 3) 
33.3333333 (=Ausgabe mit 7 Dezimalstellen) 
READY. | 

PRINT 4t3 (=Eingabe: 4 hoch 3) 

64 (=Ausgabe: 4 mal 4 mal 4) 
READY. 

PRINT 300+3%*4 (=Eingabe: 300 plus (3 mal 4)) 
312 (=Ausgabe: Punkt- vor Strich) 
READY. 

PRINT (300+3)*4 (=Eingabe: 303 mal 4) 

1212 (=Ausgabe: Klammern zuerst) 
READY. 


zahlen werden auf 7 Dezimalstellen genau ausgegeben, also z.B. 
als 33.3333333. Bei Dezimalzahlen wie z.B. bei 100.5 steht der 
Dezimalpunkt, nicht aber das Komma. Geben wir mehrere Rechen- 
zeichen in einer Zeile ein, dann werden die Rechenoperationen 
+ (plus), - (minus), * (mal), / (geteilt), A (hoch) sowie ( ) 
(Setzen von Klammern) in der in der Mathematik üblichen Rang- 
folge ausgeführt. * und / sowie + und - sind gleichrangig. 


( ) Klammer Die weiter 
- Negative Zahl (Vorzeichen) obenstehende 
? Potenzieren (Hochzeichen) Rechenoperation 
* / Multiplizieren, Dividieren wird vor der 
+ -— Addieren, Subtrahieren untenstehenden 
ausgeführt. 


Rangfolge bei der Ausführung von Rechenoperationen 


zahlen bis zu 9 Stellen gibt der Computer in normaler Darstel- 
lung aus. Große Zahlen über 10 Stellen und sehr kleine Zahlen 
werden in der Exponentialdarstellung ausgegeben. Hierzu drei 
Beispiele: 


PRINT 300000000 /RET/ (=Eingabe: Zahl mit 9 Stellen) 


300000000 (=Ausgabe unverändert) 

READY. 

PRINT 3000000000 J/RET/ (=Eingabe: Zahl mit 10 Stellen) 
3E+09 (=Ausgabe: 3 mal 10 hoch 9) 
READY 

PRINT 0.0000000003 /RET/(=Eingabe einer kleinen Zahl) 
3E-10 (=Ausgabe: 3 mal 10 hoch -10) 
READY. 


Das "E" steht jeweils für Exponent bzw. Hochzahl wie z.B.: 
- 3E+09 gleich "3 mal 10 hoch 9" 

gleich "eine 3 gefolgt von 9 Nullen", 
- 3E-10 gleich "3 mal 10 hoch -10" 

gleich "3 mal 1 dividiert durch 3 hoch 10" 

gleich "3 mal 0.0000000001". 
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Zum nachfolgend wiedergegebenen Dialog: 

Das Anweisungswort PRINT läßt sich durch das Fragezeichen ab- 
kürzen. "PRINT 3/6'" können wir damit kürzer als "? 3/6" einge- 
ben. 

Auch der Commodore kürzt ab: so gibt er die Zahl 0.5 kurz als 
"5" aus. 

Ein Tip: Geben wir '"O (Oh)" anstelle von "O0 (Null)" ein, dann 
verarbeitet der Commodore diesen Buchstaben (Oh) getrennt. 


? 3/6 (=Eingabe mit ? für PRINT) 

.5 (=Ausgabe: .5 gleich 0.5) 

READY. 

? 30 ‚ (=Eingabe: keine Null, sondern O) 

3 0 (=Ausgabe: Zeichen 3 und Zeichen O) 
READY. 


2.1.2 Besondere Tasten zur Cursorsteuerung 


Wir haben bereits eine besondere Taste kennengelernt: Mit der 
Taste /RET/ schließen wir die jeweilige Eingabezeile ab. Wir 
wollen als weitere besondere Tasten /CLEAR-HOME/, die Pfeil- 
tasten und /INST-DEL/ testen. 


Bildschirm löschen mit /CLEAR-HOME/: 

Drücken wir die Taste /CLEAR-HOME/ rechts oben auf der Tasta- 
tur, bringen wir den Cursor in die linke obere Ecke des Bild- 
schirms. Drücken wir die Tasten /SHIFT/ und /CLEAR-HOME/ zu- 
sammen (wir stellen dies mit /SHIFT/+/CLEAR-HOME/ dar), wird 
zusätzlich noch der Bildschirm gelöscht, d.h. sauber gemacht. 
Die Cursorposition "links oben' nennt man 'Home-Position'. 


Cursorsteuerung mit Pfeiltasten: 

Beim Commodore 116 und beim Commodore plus/4 sind rechts vier 
Pfeiltasten sternförmig angeordnet. Beim Commodore 16 finden 
wir diese Pfeiltasten in der oberen Tastenreihe. Durch Drücken 
der Tasten 


/W Cursor nach unten 
/%/ Cursor nach oben 

/>/ Cursor nach rechts 
Je / Cursor nach links 


können wir mit dem Cursor jede Stelle auf dem Bildschirm an- 
steuern. Halten wir die Taste länger gedrückt, dann wiederholt 
sich das Weiterrücken des Cursors automatisch (Auto-Repeat). 
Damit können eine auf dem Bildschirm stehende Eingabe wieder- 
holt zur Ausführung bringen oder korrigieren. Wir geben ein: 


/SHIFT/+/CLEAR-HOME/ (=Eingabe: Bildschirm sauber) 
? 100+3 J/RET/ (=Eingabe) 
103 (=Ausgabe des Commodore) 


READY. (=Ausgabe) 
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Angenommen, wir haben uns vertippt und wünschen 900 statt 100. 
Mit der Pfeiltaste /%#/ gehen wir mit dem Cursor hoch bis zum 
"2", Dann bewegen wir den Cursor mittels />/ nach rechts bis 
auf die "1". Abschließend tippen wir 9 /RET/ ; auf dem Bild- 
Bildschirm steht nun: 


? 900+3 J/RET/ (=korrigierte Eingabe) 
903 (=Ausgabe) 
READY. 


Wichtig ist, daß beim Betätigen der /RET/-Taste alle in 
der jeweiligen Zeile stehenden Zeichen an den Commodore 'abge- 
sandt' werden - auch die ggf. rechts von /RET/ stehenden Zei- 
chen (im obigen Beispiel also die vier Zeichen "00+3". 


Bildschirm löschen mit /INST-DEL/: 

Wir drücken die Taste /INST-DEL/ rechts oben auf der Tastatur: 
der Bildschirm wird "von hinten aufgerollt' und Zeichen für 
Zeichen bzw. Zeile für Zeile gelöscht (DELete heißt löschen). 
Unser Bildschirm ist leer und der Cursor in der HOME-Position 
links oben. 


Korrigieren des letzten Zeichens mit /INST-DEL/: 
Wir tippen 100+3 ein und drücken dann einmal kurz /INST-DEL/: 


? 100+3 J/INST-DEL/ 


Die zuletzt eingetippte 3 wird gelöscht; wir können 4 /RET/ 
eingeben und erhalten dann 104 als Ergebnis der Korrektur. 
Auf diese Weise kann man mit /INST-DEL/ auch die letzten 2, 3, 
4, ... Zeichen korrigieren. 


Löschen eines Zeichens inmitten einer Zeile mit /INST-DEL/: 
Wir geben die PRINT-Anweisung (PRINT durch das "?" abgekürzt) 


? 1234556789 (ohne /RET/ !) 


ein. Der Cursor steht hinter der 9 . Wir wollen die versehent- 
lich doppelt getippte 5 löschen. Durch die Taste /£-/ steuern 
wir den Cursor nach links auf die zweite 5 „ um dann diese 5 
durch einmaliges Drücken von /INST-DEL/ zu löschen. Die Zei- 
chen 6789 werden dadurch um eine Stelle nach links verscho- 
ben. 


Einfügen eines mittleren Zeichens mit /SHIFT/+/INST-DEL/: 
Nach dem Eintippen von 


? 124567890 (ohne /RET/) 


steht der Cursor hinter der 0 . Wir wollen die 3 einfügen. Da- 
zu steuern wir den Cursor mit der Pfeiltaste /</ links bis auf 
die 4 . Mit /SHIFT/+/INST-DEL/ schieben wir die Zeichenkette 
4567890 um eine Stelle nach rechts, um dann in die so ent- 
standene Lücke 3 /RET/ einzutippen: Am Bildschirm erscheint 
1234567890 als Antwort. 
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Verschieben wir die Zeichenkette durch /SHIFT/+/INST-DEL/ wei- 
ter nach rechts, können entsprechend mehrere Zeichen eingefügt 
werden (INSerT heißt einfügen). 


2.1.3 Text im direkten Dialog 


Bislang haben wir nur Zahlen - bestehend aus Ziffern, ggf. mit 
Dezimalpunkt und Vorzeichen - eingegeben. Zahlen werden häufig 
alsnumerische Da t en bezeichnet. 

Neben den numerischen Daten kann der Commodore auch Daten wie 
"BASIC-WEGWEISER", "LENA IST HIER." und "!!RABATT 3%!!'" verar- 
beiten. Sie heißen Text dat en . Der Commodore erkennt 
Textdaten daran, daß sie stets zwischen zwei Gänsefüßchen 


" " (das Gänsefüßchen steht über der 2: /SHIFT/+2 tippen) 
stehen. Welche Buchstaben, Ziffern und/oder Sonderzeichen da- 


bei zwischen " " stehen, spielt keine Rolle. Dazu folgende 
Beispiele: 


? "WEGWEISER" | (=Eingabe: Text mit 9 Zeichen) 

WEGWEISER (=Ausgabe ohne die Gänsefüßchen) 

READY. 

2" WEGWEISER" (=Eingabe: Text mit 15 Zeichen) 
WEGWEISER (=Ausgabe: zuerst die 6 Blanks) 

READY. 

? "WEGWEISER" (=Eingabe: Text mit 9 Zeichen) 

WEGWEISER (=Ausgabe: Nur Blanks in " " zählen) 

READY. 

? "BASIC"+"-WEGWEISER" (=Eingabe: "+" verknüpft zwei Texte) 

BASIC-WEGWEISER (=Ausgabe: Ein Text mit 15 Zeichen) 

READY. 

2 "3 +."100" (=Eingabe: "+" verknüpft zwei Texte) 

3100 (=Ausgabe: Text mit 4 Zeichen) 

READY. 

2. "3" / "100" (=Eingabe: Division / unzulässig) 

?®TYPE MISMATCH ERROR (=Ausgabe: Fehlermeldung) 

READY. 

? LEFT$("WEGWEISER",3) (=Eingabe: Links 3 Zeichen nehmen) 

WEG (=Ausgabe: Text mit 3 Zeichen) 

READY. 


Erklärung zu Leerstelle, Zahl und Zeichen "+" der Beispiele: 
- Leerstellen (Blanks, Space) gelten auch als Zeichen und wer- 
den nur berücksichtigt, wenn sie innerhalb der " " stehen. 

- "100" ist ein Textdatum, kein numerisches Datum. Der Versuch 
der Anwendung der Division mit "/" weist der Commodore mit 
der Fehlermeldung "Falscher Datentyp' ab. 

- "+" bei Text verknüpft, "+" bei numerischen Daten addiert. 

- LEFT$ ist eine spezielle Anweisung zur Textverarbeitung. 


Textdaten werden häufig als Zeichendaten, Zeichenkettendaten 
oder St rin g Ss bezeichnet. 
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2.1.4 Besondere Tasten zur Farbsteuerung 


2.1.4.1 Schwarzweiß-Bildschirm 


Wird der Commodore mit einem Schwarzweiß-Bildschirm betrieben, 
erscheint die Ausgabe in schwarzer Schrift auf hellgrauem Hin- 
tergrund. Durch Eingabe von /CTRL/+2 (also die /CTRL/-Taste 
gedrückt halten und kurz die 2 tippen) verschwindet der Cursor 
am Bildschirm, da wir mit dieser Tastenkombination die weiße 
Farbe eingestellt haben. Geben wir /CTRL/+1 ein, erscheint der 
schwarze Cursor wieder. Die in der Abbildung wiedergegebenen 
16 Zeichenfarben können wir beim Schwarzweiß-Bildschirm nur 
insofern ausnutzen, als z.B. /CTRL/+6 für die grüne Farbe eine 
Grautönung der Ausgabezeichen ergibt. 


Neben den Farben hell und dunkel stehen uns zwei spezielle Ar- 
ten der Ausgabe zur Verfügung: die Revers- und Flash-Schrift. 


Taste: Tastenaufdruck {()]: Bedeutung: 

/CTRL/+9 Reverse Schrift an Helle Zeichen in dunkler 
(RVS ON) Umrahmung 

/CTRL/+0 Reverse schrift aus Wieder normal: dunkle 
(RVS OFF) Zeichen 

/CTRL/+, Flash-Schrift an Zeichen gehen ständig an 
(FLASH ON) und aus (wie der Cursor) 

/CTRL/+. Flash-Schrift aus Wieder normal: Zeichen 
(FLASH OFF) bleiben stehen 


(In Klammern gesetzt: Tastenbezeichnungen) 


Reverse Schrift und Flash-Schrift 


2.1.4.2 Farb-Bildschirm 


Benutzen wir den Commodore mit einem Farb-Bildschirm, so wird 
nach dem Einschalten in schwarzer Schrift auf hellgrauem Hin- 
tergrund ausgegeben (der Rahmen ist hellblau). Hit der Tasten- 
kombination /CTRL/+6 wählen wir z.B. die grüne Farbe. Sechzehn 
Farben stehen zur Verfügung (siehe Abbildung). Durch /CTRL/ in 
Verbindung mit einer der Ziffern 1-8 erhalten wir die ersten 8 
Farben. Drücken wir die auf der Tastatur links unten befindli- 
che "Commodore-Taste" (hier als /C</ dargestellt), werden wei- 
tere 8 Farben angesteuert. 
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Taste: Tastenaufdruck: Taste: Tastenaufdruck: 


/CTRL/+1 Schwarz (BLK) /c«</+1 Orange (ORNG) 
/CTRL/+2 Weiß (WHT) /c</+2 Braun (BRN) 
/CTRL/+3 Rot (RED) /c</+3 Hellrot (YL GRN) 
/CTRL/+4 Türkis (CYN) /C</+4 Grau 1 (PINK) 
/CTRL/+5 Violett (PUR) /c</+5 Grau 2 (BL GRN) 
/CTRL/+6 Grün (GRN) /c</+6 Hellgrün (L BLU) 
/CTRL/+7 Blau (BLU) /c</+7 Hellblau (D BLU) 
/CTRL/+8 Gelb (YEL) /c</+8 Grau 3 (L GRN) 


Sechzehn Zeichenfarben des Bildschirmes 


Die Möglichkeiten der Revers- und Flash-Darstellung stehen uns 
beim Farb-Bildschirm natürlich ebenfalls offen. Wie die fol- 
genden Beispiele zeigen, können die Revers-, Flash- und Farb- 
Darstellungen kombiniert werden: 


- Einen roten Balken ziehen: 
/CTRL/+3 /CTRL/+9 Leertaste gedrückt halten /RET/ 
(RED) (RVS ON) 


- Buchstaben "A" in rotem Balken "'"flackern' lassen: 
/CTRL/+9 /CTRL/+, Taste A gedrückt halten /RET/ 
(RVS ON) (FLASH ON) 


- 4 Zeichen des Wortes "PLUS" in der Farbfolge schwarz, 
rot, türkis und orange ausgeben lassen: 
/CTRL/+1 P /CTRL/+3 L /CTRL/+4 U /c</+1 S /RET/ 
(BLK) (RED) (CYN) (ORNG) 


2.1.5 Text-Modus und Grafik-Modus 


In den obigen Beispielen haben wir die Texteingabe nicht zwi- 
schen Gänsefüßchen gesetzt. Aus diesem Grunde erscheint nach 
der Ausführung jeweils die Meldung SYNTAX ERROR . Verwenden 
wir Gänsefüßchen (vgl. Abschnitt 2.1.3) urd geben wir z.B. 


PRINT "FL AU AS" 


ein, wird der Text PL US win den 4 Farben schwarz (P), rot 
(L), türkis (U) und orange (S) ausgegeben, ohne daß eine Feh- 
lermeldung erfolgt. Das Beispiel zeigt, daß Farbsteuerzeichen 
auf Bildschirm und Drucker als Grafikzeichen 1er- 
scheinen. Das Farbsteuerzeichen /C</+1 (für orange) erscheint 
z.B. als 'reverses Pik'. 


wie die Farbsteuerzeichen erscheinen auch die Zeichen zur Cur- 
sorsteuerung als Grafikzeichen. Durch die Eingabe von 


FEIHT "TE#T UMTEN 2 TEAT ÜBEN" 


wird folgendes bewirkt: TEXT UNTEN erscheint, dann wird der 
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Bildschirm gelöscht und TEXT OBEN steht oben links am leeren 
Bildschirm. Zwischen TEXT UNTEN und TEXT OBEN wurde das Zei- 
chen /CTRL/+/CLEAR-HOME/ getippt; dieses Zeichen steuert den 
Cursor in die linke obere Ecke und löscht den Bildschirm (vgl. 
Abschnitt 2.1.2). Es wird am Bildschirm durch das Grafikzei- 
chen "'inverses Herz' dargestellt. 


Durch Drücken der Tasten /SHIFT/+/C</ gelangen wir in den so- 
genannten Text - Modus „in dem Zeichen entweder als 
Klein- oder Großbuchstaben erscheinen. Drücken wir nochmals 


/SHIFT/+/C</ (Umschaltung von Grafik- in Text-Modus 
und umgekehrt), 


gelangen wir wieder inden Grafik - Modus _ zurück, 
in dem sich der Commodore nach jedem Einschalten automatisch 
befindet. Mit /SHIFT/+S erscheint das "dunkle Herz' als Gra- 
fikzeichen und mit S wird der Großbuchstabe S ausgegeben. Auf 
diese beiden Zeichensätze gehen wir später noch genauer ein. 


Tippen wir /SHIFT/+/CLEAR-HOME/ , dann wird der Bildschirm ge- 
löscht. Schalten wir den Strom aus, dann ist auch der Haupt- 
speicher des Commodore gelöscht. .... alle Arbeit umsonst, da 
nichts dauerhaft (z.B. auf einer Diskette) gespeichert wurde. 
Sollen Da ten (z.B. Adreßdaten) oder ein Programm 
(z.B. ein Programm zur Ermittlung des Benzinpreises) über eine 
längere Zeit aufbewahrt werden, wird man sie außerhalb des RAM 
z.B. auf Kassette (Datasette) oder Diskette (Floppy) abspei- 
chern. Dem Abspeichern eines Programmes auf Diskette wenden 
wir uns im folgenden Abschnitt 2.2 zu. Wir werden ein kleines 
Proyramm am Bildschirm eingeben, testen und dann auf Diskette 
abspeichern. 


2.2 Unser erstes Programm in BASIC 3.5 (Programm-Modus) 


Als erstes eigenes Programm wollen wir ein Programm mit dem 
Namen VERBRAUCHT! erstellen, d.h. über Tastatur eintippen und 
auf Diskette abspeichern. 
Das Programm VERBRAUCHI löst das folgende Problem: 
"Benzinverbrauch beim Pkw: Ermittlung des Verbrauchs 
in Liter/100 km für eine Tankfüllung von 60 Litern". 
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2.2.1 Schritt 1: Leeren Hauptspeicher bereitstellen 


Der Hauptspeicher (Arbeitsspeicher RAM) des Commodore befindet 
sich unter der Tastatur. In dieses '"Gedächtnis' des PCs können 
wir -ohne Tricks- immer nur e i n Programm abspeichern bzw. 
eingeben. 


Wir verbinden den Commodore mit der Floppy bzw. Diskettenein- 
heit (Steckeranschluß "SERIAL" am Commodore). Dann schauen wir 
nach, ob sich in der Floppy eine Diskette befindet. Falls ja - 
bitte entnehmen, da das Einschalten des Commodore bei einge- 
legter Diskette zur Zerstö6ö rung des gesamten Disket- 
teninhaltes führen kann. 

Nun wird z ue rs t die Floppy und dann der Commodore einge- 
schaltet. Am Bildschirm erscheint die folgende Meldung: 


COMMODORE BASIC V3.5 12277 BYTES FREE 
READY. 


Das heißt, daß ein leerer RAM mit einer Speicherkapazität von 
12277 Zeichen bzw. Bytes bereitgestellt ist. Diese 12277 Bytes 
gelten für den Commodore 16 und 116; beim Commodore plus/4 da- 
gegen erscheinen 60671 BYTES FREE. 


Wurde bereits zuvor mit dem Commodore gearbeitet und befin- 
den sich sich ein Programm oder Daten im Hauptspeicher, müssen 
wir diese Information aus seinem Gedächtnis löschen. Dies er- 
reichen wir durch die Anweisung NEW. Der Dialog 


NEW /RET/ (=Unsere Eingabe: Speicherinhalt löschen) 
READY. (=Ausgabe: Hauptspeicher gelöscht) 


stellt uns ebenfalls einen leeren Hauptspeicher bereit. Die 
Anwendung der Anweisung NEW will wohlüberlegt sein: Daten und 
Programme, die zuvor nicht auf Diskette oder Kassette gespei- 
chert wurden, werden gelöscht und sind endgültig verloren. 


2.2.2 Schritt 2: Programm Zeile für Zeile eintippen 


Der Hauptspeicher des Commodore ist jetzt leer ohne Inhalt. 
wir wollen das in Abschnitt 3.1.1.1 dargestellte Programm mit 
dem Namen VERBRAUCHI eintippen: Zeile für Zeile, wobei am Ende 
jeder Zeile die RETURN-Taste gedrückt wird (abgekürzt: /RET/). 
Wir tippen ein: 


10 LET T = 60 /RET/ 
20 PRINT "EINGABE: GEFAHRENE KM" /RET/ 
30 INPUT K /RET/ 


Nach diesen ersten drei Programmzeilen tippen wir ein: 


LIST /RET/ 
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Der Commodore LISTet jetzt die drei Programmzeilen 10-30 auf, 
wie er sie im Hauptspeicher abgespeichert hat. Der LIST-Befehl 
dient uns so zur Kontrolle. Sind die drei Programmanweisungen 
wie gewünscht abgespeichert? Falls nein: bitte nochmals tippen 
10 LETT = ... usw. Falls ja: Wir tippen die anderen vier Pro- 
grammzeilen 40-70 ein: 


40 LET D = 100 * T / K /RET/ 

50 PRINT "AUSGABE: LITER/100 KM" /RET/ 
60 PRINT D /RET/ 

70 END /RET/ 


Wird nun erneut der Befehl 
LIST /RET/ 
eingetippt,so müßte die komplette Anweisungsfolge Zeile 10-70 


am Bildschirm erscheinen und dann wieder das READY.-Zeichen 
als das Bereitschaftszeichen des Commodore-BASIC. 


2.2.3 Schritt 3: Programm mit RUN ausführen lassen 


zur Ausführung des nun im Hauptspeicher RAM befind- 
lichen Programmes tippen wir den Befehl 


RUN /RET/ (=Eingabe von uns) 


ein. Das Programm wird jetzt so ausgeführt, wie es dem Commo- 
dore durch die Anweisungen in den Zeilen 10-70 befohlen wird. 
Tippen wir z.B. 600 km ein, so zeigt sich uns folgender Dialog 
(auch Ausführung, Dialogprotokoll oder Programmlauf genannt): 


RUN /RET/ (=Eingabe von uns) 
EINGABE: GEFAHRENE KM (=Ausgabe des Computers) 
? 600 /RET/ (=Eingabe von uns) 
AUSGABE: LITER/100 KM (=Ausgabe des Computers) 
10 (=Ausgabe des Computers) 
READY. (=Ausgabe des Computers) 


Wenn wir mit einer Tankfüllung von 60 Litern genau 600 km weit 
kommen (es wird beim Proramm VERBRAUCHI also stets angenommen, 
daß der Tank vollständig leer gefahren wurde), dann entspricht 
dies einem Durchschnittsverbrauch von exakt 10 Litern/100 km. 


Codierung mit LIST und Ausführung mit RUN: 

Die Gegenüberstellung von Codierung und Ausführung zu unserem 
Programm zeigt, daß die Zeilennummern 10 - 70, die Anweisungs- 
worte LET (berechne), PRINT (gib aus), INPUT (gib ein) und 
END, die Gänsefüßchen "" und die gesamten LET-Anweisungen beim 
Ausführungsprotokoll nicht am Bildschirm erscheinen. 

wir können das im RAM gespeicherte Programm jetzt wiederholt 
mittels RUN /RET/ laufen lassen: mit jeweils anderen Zahlen, 
aber stets in der gleichen Anweisungsfolge Zeile 10,20,30, ... 
Ein Hinweis: Der exakte Programmablauf wird in Abschnitt 3.1.1 
erklärt. 
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Im RAM befinden sich e i n Programm namens VERBRAUCHT sowie 
die drei Variablen namens T, K und D. Das Programm stellen wir 
uns als große Schachtel vor mit einer Anweisungsfolge als Wert 
bzw. Inhalt (hier 7 Anweisungen), die Variablen als Schachteln 
mit Zahlen als Inhalt. Die Abbildung zeigt die drei Speicher- 
zustände, in die wir den RAM nach und nach versetzt haben. Da- 
bei ist festzuhalten: in den RAM können wir jeweils nur ein 
Programm speichern, aber mehrere Variablen. 


RAM nach Eintippen RAM nach Eintippen RAM nach Ausführung 
‚des NEW-Befehls: von VERBRAUCH]: von VERBRAUCH]: 





Leer: Speicher- 
plätze weder mit 
Anweisungen (Pro- 
gramm) noch mit 
Daten (Variablen) 
belegt. 


VERBRAUCHI VERBRAUCH]I 
10 LET -.u = 
20... 


70 END 


10 LET ae 
20 .n=- | 


WE wu we we we 


70 END 


Weder (Anwender)- Ein Programm Ein Programm und 
Programm noch Daten drei Variablen 


Speicherbelegung des Hauptspeichers (RAM) zu drei Zeitpunkten 


Über die PRINT-Anweisung können wir uns die derzeitigen Werte 
der Variablen im direkten Dialog (o h ne Zeilennummer: statt 
z.B. 100 PRINT T also PRINT T) zeigen lassen: 


PRINT T /RET/ (=Eingabe von uns) 
60 (=Ausgabe des Computers) 
READY. (=Ausgabe des Computers) 
PRINT K,D /RET/ (=Eingabe von uns) 
600 10 (=Ausgabe des Computers) 
READY. (=Ausgabe des Computers) 


In T ist 60 gespeichert und in K bzw. in D genau 600 bzw. 10. 
Dabei geben wir PRINT ohne vorhergehende Zeilennummern ein, um 
uns die Variablenwerte direkt PRINTen bzw. ausgeben zu lassen. 
Da die PRINT-Anweisung nun direkt ausgeführt wird, spricht man 
von der direkten Betriebsart oder (wie im 
vorhergehenden Abschnitt ) vom direkten Dialog. 
Geben wir am Zeilenanfang eine Zeilennummer ein, dann wählen 
wir damit die indirekte Betriebsart bzw. 
den programmgesteuerten Dialog. Die 
Anweisungen hinter den Zeilennummern werden gespeichert und 
später nach dem Eintippen von RUN gemäß dieser Numerierung zur 
Ausführung gebracht. 
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Betriebsart 

DIREKTER DIALOG PROGRAMMGESTEUERTER DIALOG 
(Direktausführung, (Programmausführung, 

direkte Betriebsart, indirekte Betriebsart, 
Direkt-Modus, Programm-Modus, 
Direktanweisung) Programmanweisung) 
Eingabe von Anweisungen Eingabe von Anweisungen mit 
direkt. vorangestellten Zeilennummern. 
Ausführung sofort. Ausführung erst später 


mittels RUN. 
Beispiel: PRINT D Beispiel: 60 PRINT D 


Direkter und programmgesteuerter Dialog 


2.2.4 Schritt 4: Programm mit DSAVE auf Diskette speichern 


Bei Abschalten des Stromes (bitte nicht tun!) wäre unser Pro- 
gramm verloren. Wir speichern deshalb eine Kopie des Programms 
auf Diskette ab. 


Das Diskettenlaufwerk (z.B. Floppy '"VC1540, VC 1541") sollte 
bereits eingeschaltet sein und die grüne Lampe leuchten (vgl. 
Abschnitt 2.2.1). Falls noch nicht geschehen: bei leerer 
Floppy einschalten und erst dann eine Diskette einlegen. Das 
Einschalten bei eingelegter Diskette kann u.U. zur Zerstörung 
aller bereits auf Diskette gespeicherter Programme führen. 


wir legen eine bereits beschriebene Diskette ein. Der Einfach- 
heit benutzen wir die zur Floppy 1541 gehörige Diskette namens 
TEST/DEMO, die noch genügend Speicherplatz frei hat (den auf- 
geklebten Schreibschutz (Silberpapierstreifen) vor dem Einle- 
gen entfernen). 

Jetzt geben wir die folgende DSAVE-Anweisung zum Speichern des 
Programmes VERBRAUCHI ein: 


DSAVE "VERBRAUCH1" /RET/ (=Eingabe von uns) 
SAVING 0:VERBRAUCHI (=Ausgabe: es wird gespeichert) 
READY. (=Ausgabe: Bestätigung) 


Nach Erlöschen der Hinweis-Lampe am Diskettenlaufwerk ist eine 
Kopie des im lInternspeicher RAM befindlichen Programms unter 
dem Namen VERBRAUCHI auf der Diskette als Externspeicher dau- 
erhaft gespeichert. Schalten wir nun den Strom ab, so geht nur 
das im RAM befindliche Programmoriginal verloren, nicht jedoch 
die Kopie auf der Diskette (die ja geSAVEd bzw. gerettet ist). 
Unser Programm ist auf dem Laufwerk mit der Nummer 0 abgelegt 
worden - deshalb die Ausgabe 0:VERBRAUCHI. 
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Hinter dem Befehlswort DSAVE wird der Programmname (maximal 16 
Zeichen lang) in Gänsefüßchen angegeben. Das letzte " kann man 
auch weglassen und DSAVE "VERBRAUCHI tippen. DSAVE bedeutet 
"Disk SAVE", d.h. auf Diskette speichern. Geben wir nur SAVE 
ein, dann wird die Datasette zur Speicherung angesprochen und 
die Meldung "Press Play & Record on Tape" ausgegeben. Mit der 
Eingabe von /RUN-STOP/ (Taste links unten) können wir diesen 
Vorgang abbrechen. 


Durch Eingabe des Befehls DIRECTORY gibt der Commodore ein In- 
haltsverzeichnis aller gerade auf der eingelegten Diskette ge- 
speicherten Programme aus: 


DIRECTORY /RET/ (=Eingabe: Directory auflisten) 


0 "1541 TEST/DEMO "2X 2A Inhaltsverzeichnis für: 
13 "HOW TO USE" PRG - Diskettenlaufwerk 1541 
"HOW PART TWO"" PRG - Diskette TEST/DEMO 
"VIC-20 WEDGE" PRG - Mehrere Programme 


... (PRG für Programm) 


weitere Programme 


13 "RANDOM FILE" 
1 "VERBRAUCH1!" 
557 BLOCKS FREE 
READY. 





Die erste Zeile des Inhaltsverzeichnisses gibt in negativer 
Schrift (invers) den Namen der Diskette mit TEST/DEMO und ihre 
Identifikation (ID) mit 2X an. 

Nach den Programmen "HOW TO USE", "HOW PART TWO", ... ist das 
Programm "VERBRAUCH1" jetzt als letztes auf der Diskette ge- 
speichert. Es belegt nur einen Block Speicherplatz (ist also 
sehr klein). Auf der Diskette sind noch 557 Blöcke zur Spei- 
cherung weiterer Programme frei (PRG für PRoGramn). 


Anstelle von DIRECTORY können wir auch verkürzt DI- eingeben, 
wobei das "-" als Grafikzeichen für /SHIFT/+R (groß R) steht. 


2.2.5 Schritt 5: Programm mit DLOAD von Diskette laden 


Wir tun nun so, als ob wir erst morgen mit der Arbeit fortfah- 
ren wollten und schalten den Commodore aus: 


1) Diskette entnehmen und in die Hülle stecken. 
2) Commodore auschalten. 
3) Floppy ausschalten. 


Beim anschließenden Einschalten gehen wir in genau entgegen- 
gesetzter Reihenfolge vor: 


1) Floppy einschalten 
2) Commodore einschalten 
3) Diskette einlegen (wichtig: Diskette zuletzt!) 
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Der Hauptspeicher ist nun wieder leer. Um mit unserem Programm 
VERBRAUCHI weiter arbeiten zu können, müssen wir es von der 
Diskette in den Hauptspeicher laden. Dazu tippen wir die fol- 
gende DLOAD-Anweisung ein (to load bedeutet laden bzw. holen): 


DLOAD "VERBRAUCH1" /RET/ (=Eingabe von uns) 
SEARCHING FOR 0:VERBRAUCHI (=Ausgabe des Commodore) 
LOADING (=Ausgabe) 

READY. 


Diese Anweisung sucht das Programm VERBRAUCHI auf der Diskette 
und lädt eine K o p i e davon in den RAM. Das Programmorigi- 
nal auf der Diskette bleibt somit unverändert erhalten. Die 0 
vor dem Programmnamen steht wieder für "Diskettenlaufwerk 0". 


Jedes Gerät hat eine Gerätenummer. Mit DLOAD wird automatisch 
die Gerätenummer 8 der Disketteneinheit angesprochen (D steht 
für Diskette). Gibt man aus Versehen statt DLOAD nur LOAD ein, 
dann zeigt sich dieser Dialog: 


LOAD "VERBRAUCH1" J/RET/ (=Eingabe von uns: D vergessen) 
PRESS PLAY ON TAPE ... (=Ausgabe des Commodore) 
/RUN-STOP / (=Eingabe von uns: Stoppen) 

? BREAK ERROR (=Ausgabe: Fehlermeldung) 
READY. (=Ausgabe) 


Beim Fehlen der Gerätenummer nimmt das System automatisch die 
Gerätenummer 1 des Bandgerätes (Tape bzw. Datasette) an. Durch 
/RUN-STOP/ (Taste links) brechen wir den Ladevorgang ab. 


Das Programm VERBRAUCHT! steht uns im RAM wieder zur Verfügung: 
mit RUN können wir es laufen und mit LIST auflisten lassen. 


2.2.6 Schritt 6: Programm geändert auf Diskette speichern 


wir wollen das Programm VERBRAUCH!I durch eine PRINT-Anweisung 
erweitern und das so geänderte Programm unter demselben Namen 
erneut auf Diskette speichern. 

Wir geben ein: 


/SHIFT/+/CLEAR-HOME/ (Bildschirm löschen) 
LIST /RET/ (Listing zeigen lassen) 


Das Listing von VERBRAUCHI steht oben am Bildschirm. Nun geben 
wir die zusätzliche Anweisung 


15 PRINT "DURCHSCHNITTSVERBRAUCH ERMITTELN" /RET/ 
ein. Wir testen den Ablauf mit RUN. Wie aus dem LISTing er- 


sichtlich, wurde die Anweisung mit Zeilennummer 15 wie beab- 
sichtigt zwischen den Zeilen 10 und 30 angeordnet. Mittels 


DSAVE "@VERBRAUCH I" (=Eingabe: Klammeraffe zum Über- 
SAVING @0 :VERBRAUCHI (=Ausgabe) schreiben) 
READY. 


speichern wir das Programm erneut. DSAVE findet auf Diskette 
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bereits ein Programm namens VERBRAUCHI vor. Der Klammeraffe ® 
(Zeichen "at sign') vor dem Programmnamen sorgt dafür, daß das 
Programm überschrieben, d.h. die 'alte' Programmversion zer- 
stört und das 'neue' Programm dafür abgespeichert wird. 


Zwei wichtige Hinweise: Vergessen wir den Klammeraffen@, dann 
meldet sich der Commodore zwar auch mit READY. ; das Programm 
wurde jedoch n i ch t erneut auf Diskette gespeichert. Tip- 
pen wir DSAVE "@:VERBRAUCH1" anstatt von "@VERBRAUCH1", wird 
der Hauptspeicherinhalt unter dem Namen ®VERBRAUCHI abgelegt. 


DSAVE "@VERBRAUCHI " überschreibt Programm VERBRAUCHI 

DSAVE "VERBRAUCHT" speichert nichts ab, falls bereits 
ein Programm VERBRAUCHI auf Disket- 
te abgelegt ist. 

DSAVE "@: VERBRAUCHT" speichert zusätzlich ein Programm 
namens P@VERBRAUCHI. 


Drei Anwendungsbeispiele zur Anweisung DSAVE 


2.2.7 Eigentlich Schritt 0: Diskette formatieren 


Wir sind bislang in diesen sechs Schritten vorgegangen: 


Schritt 0: Diskette formatieren 

Schritt 1: Leeren Hauptspeicher bereitstellen 
Schritt 2: Programm Zeile für Zeile eintippen 
Schritt 3: Programm mit RUN ausführen lassen 

Schritt 4: Programm mit DSAVE auf Diskette speichern 
Schritt 5: Programm mit DLOAD von Diskette laden. 
Schritt 6: Programm geändert auf Diskette speichern 


Bei den Schritten 4 bis 6 haben wir mit einer Diskette gear- 
gearbeitet: der Einfachheit halber haben wir die zum Commodore 
mitgelieferte TEST/DEMO-Diskette benutzt. Nun wollen wir eine 
neue, eigene Diskette verwenden. 


Das Laufwerk "Commodore VC 1541" arbeitet mit 5.25"-Disketten, 
auf die es 35 Spuren mit einfacher Schreibdichte schreibt. Es 
genügen somit Disketten "ss/sd,35 Tracks" oder "ss/dd, 1D, 40 
Tracks, 48 TPI" (ss=single sided, sd=single density, dd=double 
density). 

Solche Disketten können wir kaufen - leer, unbespielt und für 
PCs unterschiedlicher Fabrikate einsetzbar. Bevor wir auf die- 
se Disketten unsere Programme speichern können, müssen wir sie 
in eine For m bringen (Einteilung der Diskettenoberfläche 
in 35 Spuren/Tracks mit jeweils 17 bis 21 Sektoren), die genau 
dem Betriebssystem des Commodore entspricht. Dieses 'in Form 
bringen der Diskette' nennt mn Formatieren _. 


Als Diskettenname wählen wir "COMMODORE UEBENI1". Wir legen ei- 
ne leere, unbespielte Diskette ein und geben im direkten Dia- 
log den folgenden HEADER-Befehl ein: 


HEADER "COMMODORE UEBEN1",DO,IOlI /RET/ (=Unsere Eingabe) 
ARE YOU SURE? (=Ausgabe) 
Y (=Unsere Eingabe) 
READY. (=Ausgabe) 
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Das Diskettenlaufwerk ist ungefähr 1 1/4 Minuten mit dem For- 
matieren beschäftigt. Dabei ist 35 mal ein 'Knacken' zu hören, 
da 35 kreisrunde Spuren geschrieben werden und der Schreib-/ 
Lesekopf 35 mal bewegt wird. 

Der HEADER-Befehl formatiert eine Diskette im Laufwerk DO und 
versieht sie mit dem Diskettennamen "COMMODORE UEBENI1" und der 
Identifikation I0O1l. 

Vergessen wir die Identifikationsnummer, erscheint die Meldung 
BAD DISK ERROR. Geben wir die Laufwerksangabe DO nicht, wird 
SYNTAX ERROR ausgegeben. 


Wie die Abbildung zeigt, kann der HEADER-Befehl auch verwendet 
werden, um 'alte' und bereits benutzte Disketten zur Wiederbe- 


nutzung vorzubereiten. Dadurch werden alle Daten und Programme 
der Diskette gelöscht. 


Fabrikneue Diskette FORWSEFELEN und vorbereiten: 


HEADER "Dateiname" ,Dx,Izz 
Dateiname mit maximal 16 Stellen. 
Laufwerknummer 0 oder 1 (DO, D1). 


Identifikationsnummer 2-stellig. 


Bereits benutzte Diskette vorbereiten: 


ME: (me Hm jHimE- mm je: mm Fine Alm: (immer MA. (EEE) hm HEHE CE HEHE FE. HE GE EG HE EG GE SEE TEE: HE: EG AEG EEE: HE EEG HE a 


HEADER "DISK1",DO Früher bereits benutzte Diskette 
unter neuem Namen vorbereiten. 


HEADER DO Früher bereits benutze Diskette 
unter bisherigem Namen vorbereiten 
Formatieren von Disketten mit dem Befehl HEADER 
Wir lassen uns nun das Inhaltsverzeichnis der neuen und soeben 
formatierten Diskette zeigen: 
DIRECTORY /RET/ (=Eingabe: Directory auflisten) 
0 "COMMODORE UEBEN1" 01 2A 
664 BLOCKS FREE 
READY. 


Auf der Diskette "COMMODORE UEBEN!" mit der Identifikation 01 
ist noch kein Programm gespeichert. Alle 664 Blöcke sind frei. 
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Wie können wir das Programm VERBRAUCHI jetzt von der Diskette 
TEST/DEMO auf die Diskette COMMODORE UEBEN]I umspeichern bzw. 
kopieren? Wir gehen in fünf Schritten wie folgt vor: 


Schritt 1: Bisherige Diskette TEST/DEMO einlegen. 


Schritt 2: Programm VERBRAUCHI von Diskette in den RAM laden: 
DLOAD "VERBRAUCH1" /RET/ 
SEARCHING FOR 0:VERBRAUCHI 
LOADING 
READY. 


Schritt 3: Diskette COMMODORE UEBEN]I einlegen. 


Schritt 4: Programm VERBRAUCHT auf neue Diskette speichern: 
DSAVE "VERBRAUCH1" /RET/ 
SAVING 0 :VERBRAUCHI 
READY. 


Schritt 5: Inhaltsverzeichnis überprüfen: 
DIRECTORY /RET/ 


0 "COMMODORE UEBEN1" 01 2A 
1 "VERBRAUCHI PRG 
663 BLOCKS FREE 

READY. 


Unsere Übungsäiskette COMMODORE UEBENI! enthält somit ein Pro- 
yramm namens VERBRAUCH]I. 


Durch Eingabe von DIRECTORY oder kurz DIR (D, I und /SHIFT/+R 
tippen) erhalten wir das Disketteninhaltsverzeichnis auf dem 
Bildschirm. Zur Druckausgabe des Inhaltsverzeich- 
nisses geben wir im direkten Dialog ein: 


LOAD '$",0O /RET/ Inhaltsverzeichnis in den RAM laden 
SEARCHING FOR $ 

READY. 

OPEN 1,4: CMD1 /RET/ Kanal zum Drucker Öffnen 

LIST /RET/ Verzeichnis ausdrucken 


Durch das Laden des Inhaltsverzeichnisses geht ein ggf. im RAM 
stehendes Programm verloren. 


2.3 Alle Befehle der Sprache BASIC 3.5 an Beispielen 


Die folgende Kurzbeschreibung orientiert sich an Beispielen. 
Dies gilt für die Beschreibung der Daten wie der Anweisungen, 
die die Programmiersprache "COMMODORE BASIC V3.5" - kurz als 
BASIC 3.5 bezeichnet - dem Benutzer bereitstellt. 

Bei der Kurzbeschreibung von BASIC 3.5 beziehen wir uns auf 
die allgemeine Darstellung der Daten- und Programmstrukturen 
von Abschnitt 1.3. 
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2.3.1 Konstante und variable Daten 


2.3.1.1 Konstanten 


BASIC kennt die Datentypen INTEGER (Ganzzahl), REAL (Dezimal- 
zahl) und STRING (Zeichenkette bzw. Text). Entsprechend gibt 
es auch drei Typen von Konstanten, also drei Typen 
von Daten, die während des Programmlaufes unverändert bleiben: 
INTEGER-Konstanten, REAL-Konstanten und STRING-Konstanten. 


Datentyp: Kennzeichen: Speicher- Beispiele: 
platz: 

INTEGER -32767 bis 32767 7 Bytes 321, -10000, -1 

REAL Größer als INTEGER 7 Bytes 999182 -1111119 
oder E (Exponent) 3.1E8 = 3.1%*10°8 
oder Punkt mit 5543.11 .752 
max. 7 Stellen 0.00002 -0,.097 

STRING Max. 255 Zeichen; bis 255 "DM-BETRAG" "#*" 
zwischen " " Bytes "12" "Ergebnis" 


Numerische (INTEGER,REAL) und Textkonstanten (STRING) 


zahlen vom Datentyp REAL werden mit 7 Dezimalstellen verarbei- 
tet. Vor der Ausführung von Rechenoperationen werden Zahlen 
vom Datentyp INTEGER in den Datentyp REAL verwandelt. Oder an- 
ders ausgedrückt: INTEGER-Zahlen sind eine Teilmenge der REAL- 
zahlen. 


2.3.1.2 Variablen für einfache Datentypen 


Jede Variable hat einen Namen, einen Datentyp und einen Wert, 
der sich ändern kann und somit variabel ist (Abschnitt 1.3.4). 
Wie für die Konstanten unterscheidet BASIC auch für die Varia- 
blen die drei Typen INTEGER, REAL und STRING. 


Datentyp: Typzeichen: Beispiele für Variablennamen: 
INTEGER & I% ZINSTEILER® A33% SATZNR#% 
REAL ohne DM SUMME#F# Al B18554 A33 
STRING 5 NAME$ A.1$ BEZEICHNUNG$ FILE$F 


Numerische Variablen (INTEGER,REAL) und Textvariablen (STRING) 
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Der jeweilige Datentyp wird durch ein Typzeichen festgelegt. 
Geben wir keines der beiden Datentypzeichen % und $ am Ende 
eines Variablennamens an, dann nimmt BASIC automatisch REAL 
als Datentyp an. 

Außer dem Typzeichen können wir unsere Variablennamen beliebig 
wählen. Dabei müssen sie sich in den ersten zwei Zeichen un- 
terscheiden. Der Name muß natürlich mit einem Buchstaben be- 
ginnen. Variablennamen können bis zu 255 Zeichen lang sein. 
Die Namen MEHRWERTSTEUER, ME7715, ME7715$, MELDUNG3, MELDUNG% 
und MEERESTIEFE werden somit in BASIC als ME, ME, ME$, ME, ME% 
und ME unterschieden. Viermal taucht der Variablenname ME auf; 
solche Überschneidungen sind in jedem Fall zu vermeiden. Also 
beachten: Variablennamen müssen sich in den erstenbeiden 
Zeichen u n d dem Datentypzeichen unterscheiden. 


eingegebener Name: vom Commodore erkannt: 
ZINS1I ZI 

ZINS2 ZI 

ZIZINS 21 

Z2ZINS 22 

ZIZINS$ 21$ 


Zwei Anfangszeichen und Datentypzeichen kennzeichnen Variablen 


BASIC verfügt über reserviert e Worte wie LIST, FN, 
GOSUB, TO, ST oder PRINT. In Abschnitt 2.1.3 sind diese Worte 
für Anweisungen usw. wiedergegeben. Verwenden wir solche Worte 
als Variablennamen, so führt dies zwangsläufig zu Fehlern. Wo- 
her soll BASIC auch wissen, wann z.B. LIST als Variablenname 
zu gelten hat und wann als Befehl zum Auflisten des Programms? 


Das Einrichten von Variablen heißt Vereinbarung 
(vgl. Abschnitt 1.3.4.2). In BASIC gibt es nur die sogenannte 
inplizite Vereinbarung. Dabei teilt man 
durch Angabe des Typzeichens den Datentyp mit. So soll z.B. M$ 
STRINGs aufnehmen können (Typzeichen $), M% aber INTEGER-Zah- 
len (Typzeichen $%). 

In den Programmbeispielen von Abschnitt 3 weisen wir über REM- 
Anweisungen ausdrücklich auf den gewählten Datentyp hin. Damit 
erreichen wir eine fast e xp li z it e Vereinbarungsform. 


2.3.1.3 Variablen für Datenstrukturen 


Bei den Variablen für einfache Datentypen wird jeweils nur 
e i n Datum als Variable gespeichert, bei den Variablen für 
strukturierte Datentypen bzw. Datenstrukturen sind es mehrere 
Daten (vgl. Abschnitt 1.3.2). 

In BASIC stehen uns als Datenstrukturen ARRAYs bzw. Tabellen 
sowie FILEs bzw. Dateien zur Verfügung. 


96 2 Einstieg in die BASIC-Programmierung 


Arrays (oft auch Tabellen, Felder, Bereiche, Listen oder 
Vektoren/Matrizen genannt) umfassen mehrere Elemente vom glei- 
chen Datentyp. Entsprechend können INTEGER-ARRAYs, REAL-ARRAYs 
und STRING-ARRAYs vereinbart werden. Zur Vereinbarung der Aus- 
dehnung bzw. Dimension dient stets die DIM-Anweisung. In Ab- 
schnitt 3.7 gehen wir näher auf Arrays ein. 


100 DIM L&(30) i-dimensionaler INTEGER-ARRAY zur Auf- 
nahme von 31 Ganzzahlen an den Stellen 
0,T,2r37==..,30. Name des Arrays: L%. 


100 DIM S{(2,6) 2-dimensionaler REAL-ARRAY zu 3 Zeilen 
und 7 Spalten, d.h. 21 Elementen, 


100 DIM B$(2,3,4) 3-dimensionaler STRING-ARRAY mit 3%4%#5 
=60 Elementen zu je 255 Zeichen max. 


100 DIM M(A%) I-dimensionaler REAL-ARRAY mit A% Ele- 
menten; Index -hier A%- stets INTEGER. 


INTEGER-ARRAY, REAL-ARRAY und STRING-ARRAY 


zum F i le (Datei) als zweiter Datenstruktur: BASIC unter- 
stützt direkt nur die sequentielle Datei. In Abschnitt 3.9.1 
gehen wir auf diesen Dateityp ein. Die Direktzugriff-Datei als 
REL-Datei (für RELative Datei) ist in BASIC 3.5 "über Umwege' 
ebenfalls verfügbar. Wir zeigen dies in Abschnitt 3.9.2. 


2.3.2 Anweisungen, Kommandos, Funktionen und Systemvariablen 
Im folgenden werden die Befehle von BASIC 3.5 alphabetisch ge- 
ordnet zusammengefaßt. 


- BASIC-Anweisungen werden zumeist innerhalb eines Programmes 
mit einer Zeilennumer angegeben wie z.B. 100 PRINT "C-16". 


- Benutzer-Kommandos werden vom Benutzer getippt und sofort 
ausgeführt wie z.B. LIST. 


- Funktionen werden zusammen mit BASIC-Anweisungen angegeben 
wie z.B. 100 PRINT "ZUFALLSZAHL:"; RND(1) . 


- Systemvariablen werden ebenfalls zusammen mit BASIC-Anwei- 


sungen genannt wie z.B. 100 PRINT "FEHLER:"; ERR$ . 


zu jedem Befehl wird ein Beispiel angegeben. Genauere Erläu- 
terungen zu den Befehlen finden Sie in Abschnitt 3. 


2.3 BASIC 3.5 — Befehle an Beispielen 97 


2.3.2.1 Elementare Anweisungen und Kommandos 


AUTO 

(Automatische Zeilennumerierung): 

AUTO 100 Programm neu numerieren: 100,110,120,... 
CLR 

(Löschen von Variablenwerten): 

CLR Alle Variablen vom Typ INTEGER, REAL und STRING 

erhalten die Werte 0 bzw. "" (Leerstring). 

CONT 


(Ausführung fortsetzen): 

CONT Ausführung fortsetzen mit Zeile der Unterbrechung. 
Unterbrechung durch /RUN-STOP/ oder durch Anweisungen 
STOP bzw. END. 


DATA 
(Daten im Programm speichern): 
100 DATA 22,"DM/STD" Daten programmintern speichern und 
110 READ D,D$ nach D (22) und D$ ("DM/STD") lesen. 


DEF FN... 
(Definieren einer Funktion): 
100 DEF FNDOPPEL(X)=X*2 Definition der Funktion FNDOPPEL, 
110 PRINT FNDOPPEL(A) die bei Aufruf Wert A verdoppelt. 


DELETE 
(Zeilen des im RAM befindlichen Programmes löschen): 
DELETE 100-140 Zeilen von 100 bis 14 löschen. 


DIM 
(Dimensionieren von Arrays): 
100 DIM M(3,8) REAL-Array M mit 4 Zeilen/9 Spalten und 
110 DIM A$(9),B$(9) zwei STRING-Arrays (10 Stellen). 

DO - LOOP - UNTIL 
(Nicht-abweisende Schleife): 
100 DO Wwiederhole die Anweisungen zwischen 
... 100 und 180, bis (=until) die Be- 
180 LOOP UNTIL X=0 dingung X=0 erfüllt ist. 

DO - WHILE - LOOP 
(Abweisende Schleife): 
100 DO WHILE X<>0 Wiederhole die Anweisungen zwischen 
... 100 und 180, solange (=while) die 
180 LOOP Bedingung X?°?0 erfüllt ist. 

END 
(Beenden der Programmausführung): 
END Ausführung des Progamms beenden. 

FOR - NEXT 


(Zählerschleife): 
100 FOR I=1 TO 10 STEP 2 zZählerschleife gibt Werte 1,3,5,7 
110 PRINT I : NEXTI und 9 der Laufvariablen I aus. 
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GET 

(Einzelnes Zeichen von Tastatur lesen): 

100 GET E$: IF E$="" GOTO 100 Bei Drücken einer Taste mit 

110 ... Folgezeile 110 fortfahren. 
GETKEY 

(einzelnes Zeichen von Tastatur lesen); 

100 GETKEY E$ Wie GET, aber ohne Schleife. 
GOSUB - RETURN 


(Unterprogrammsteuerung): 
100 GOSUB 2000 Unterprogramm ab Zeile 2000 aufrufen, aus- 
110 ... führen und mit RETURN nach Folgezeile 110. 


GOTO 


M 


(Unbedingte Verzweigung): 
100 GOTO 350 Von Zeile 100 (unbedingt) zu 350 verzweigen. 


EY 
(Belegung der Funktionstasten anzeigen): 
KEY Belegung der acht Funktionstasten zeigen. 


KEY 5,"TEST" Funkionstaste 5 mit dem String "TEST" belegen. 


F - THEN 

(Verzweigung nach Entscheidung: einseitige Auswahl): 

100 IF G=3 GOTO 350 Wenn N=3, dann nach 350 verzweigen. 
100 IF G=3 THEN 350 Verzweigung wie mit GOTO. 

100 IF A$="JA" THEN PRINT "Richtig" Ausgabe im Fall "JA", 
F - THEN - ELSE 


(Verzweigung nach Entscheidung: zweiseitige Auswahl): 
100 IF N=9 THEN 600: ELSE 800 Wenn N=9, dann nach 600 
verzweigen, sonst nach 800. 


NPUT 

(Eingabe über Tastatur): 

100 INPUT A Tastatureingabe nach A zuweisen. 
100 INPUT "Welche Zahl";A Eingabeaufforderung zusätzlich. 
100 INPUT N,D,W$ zahlen und ein STRING als Eingabe 
ET 

(Wertzuweisung): 

100 LET K=5 Wert 5 der Variablen K zuweisen. 
- 100 LET K=K+5 Wert von K um 5 erhöhen. 

100 LET Z=K*P*T/(100*360) Wert berechnen und Z zuweisen. 
IST 

(Auflisten der BASIC-Codierung): 

LIST Alle Zeilen des Programms im RAM auflisten. 

LIST 170 Nur die Zeile 170 auflisten. 

LIST 50- LIST -50 LIST 50-300 Listen von, bis, von-bis. 


ONI TOR 
(Aufruf des eingebauten Maschinensprache-Monitors): 
MONITOR Aufruf des Monitors (mit X nach BASIC zurück). 


E W 
(Löschen des Hauptspeichers): 
NEW Im RAM befindliches Programm und Variablen löschen. 
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O 


O 


P 


P 


P 


P 


R 


R 


N - GOSUB 

(Fallabfrage mit Unterprogrammaufruf): 

100 ON W GOSUB 1000,2000,3000 Für W=1 ins Upro nach 1000, 
110 ... für W=2 nach 2000 und für W=3 nach 3000 verzweigen. 


N - GOTO 

(Fallabfrage mit Verzweigung): 

100 ON E GOTO 10,30,70 Für E=1 nach 10 verzweigen, für E=2 
110 ... nach 30, für E=3 nach 70, für E=0 nach Folgezeile. 


EEK 
(Speicherplatz direkt lesen): 
100 PRINT PEEK(5386) Inhalt von Speicherplatz 5386 zeigen. 


OKE 
(Speicherplatz direkt beschreiben): 
100 POKE 5386,255 Wert 255 nach Speicherplatz 5386 bringen. 


RINT 

(Ausgabe auf Bildschirm): 

100 PRINT A,B,C Werte von Variable A, B und C ausgeben. 
100 PRINT DM, "DM" Wert der Variablen DM und Text "DM". 


100 PRINT DM,"DM"; Das ";" am Ende unterdrückt das RETURN. 


RINT USING 
(Formatierte Ausgabe mittels Formatfeld bzw. -string): 


100 LET M$="#HHHHR. HH" Formatstring M$ als Druckmaske. 
110 PRINT USING M$;4548.75 Konstante 4548.75 und Wert von 
120 PRINT USING M$;2 2 formatiert ausgeben. 

UDEF 

(Eines der 4 Zeichen " „.$" im Formatstring neu definieren): 
100 PUDEF " .„ " Anstelle des "," steht der "." 

EAD 

(Lesen von Daten aus DATA-Zeile): 

100 READ T Nächsten Wert aus DATA nach T einlesen. 
100 READ T,A$,V(I) Reihenfolge REAL, STRING, REAL in DATA. 
E M 


(Bemerkungen in BASIC-Codierung einfügen): 
100 REM AUTOR: X.HOFFMANN Bemerkung (Remark) bei LIST zei- 
gen, nicht aber bei RUN. 


ENUMBER 
(Zeilennummern des im RAM stehenden Programms numerieren): 
RENUMBER 100 Zeilennummern jetzt: 100, 110, 120, ... 


ESTORE 

(Lesezeiger auf Position 1 zurücksetzen): 

100 READ X,Y,2 Lesezeiger der DATA-Zeile durch RESTORE auf 
110 RESTORE Position 1 zurücksetzen, um erneut mit READ 
120 READ D,E,F lesen zu können. 


ESUME 
(Nach Fehlerbehandlung mit TRAP Ausführung fortsetzen): 
100 RESUME NEXT Ausführung mit der nächsten Zeile aufnehmen 
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RUN 
(Ausführen eines Programms im Hauptspeicher): 
RUN Das gerade im RAM befindliche Programm ausführen. 


RUN 600 Bei der Ausführung mit Programmzeile 600 beginnen. 


SCNCLR 
(Bildschirm löschen und Cursor nach links oben bringen): 
100 SCNCLR Cursor links oben (SCNCLR = SCreeN CLeaR). 


sTOoPp 
(Abbrechen der Programmausführung): 
100 STOP Abbrechen und die Meldung "BREAK IN 100" ausgeben. 


SYS 
(Sprung in ein Maschinenprogramm) 
SYS(10215) ruft ein Assembler-Programm auf, dessen Anfangs- 
adresse in Speicherplatz 10215 liegt. 


TRAP 
(Zu einer Fehlerbehandlungsroutine verzweigen): 
100 TRAP 500 Bei Fehler in die Routine ab Zeile 500 gehen. 
TRON - TROFF 
(Einen Trace-Lauf beginnen bzw. beenden): 
TRON Nach RUN das Programm schrittweise ausführen. 
TROFF Trace-Modus wieder ausschalten. 
WAIT (Warten, bis eine angegebene Speicherstelle einen 


bestimmten Wert hat) 


2.3.2.2 Elementare Funktionen und Systemvariablen 


ABS(X) 
(Absolutwert von Zahl X): 
100 PRINT ABS(-5) Absolutwert von -5 ist 5. 


ASC(S$) 

(ASCII-Codezahl von String S$): 

100 PRINT ASC("MUELLER") ASCII-Codezahl von "M" ist 77. 
ATN(X) 

(Arcustangens von Zahl X angeben) 
CHR$(A) 

(Zeichen (charcter) für ASCII-Codezahl A): 

100 PRINT CHR$(77) Das Zeichen mit Codezahl 77 ist "MM". 
cos (X) 


(Cosinus von Winkel X (Eingabe im Bogenmaß) ausgeben) 


DEC(H$) 
(Hexstring H$ in einen dezimalen Wert umwandeln): 
100 PRINT DEC("2B") Dezimalen Wert 43 (2%16 + 11) zeigen. 
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DS 
(Nummer der Fehlermeldung bei Diskettenzugriff): 
100 PRINT DS z.B. DS=61 für "FILE NOT OPEN" 


DS$ 
(Kompletten Fehlerstatus bereitstellen): 
100 PRINT DS$ Ausgabe "61, FILE NOT OPEN, 00,00". 


ER, EL und ERR$ 
(Systemvariablen mit Fehlernummer, -zeile und -meldung): 
100 PRINT ER Nummer des letzten Fehlers ausgeben. 
110 PRINT EL Zeilennummer dieses Fehlers ausgeben. 
120 PRINT ERR$(ER) Letzte Fehlermeldung ausgeben. 


EXP(X) 
(Exponentialfunktion für e): 
100 PRINT EXP(]) Zahl e hoch 1 ergibt 2.71828183. 


FRE(0O) 
(Für Anwender verfügbaren Speicherplatz zeigen (0O=dummy)): 
100 PRINT FRE(0) Im RAM frei verfügbar z.B. 12652 Zeichen. 


HEX$ (2) 
(Hexadezimalen Wert der dezimalen Zahl Z angeben): 
100 PRINT HEX$(43) Ausgabe von 002B als Hex-Wert. 
INSTR(G$,T$) 
(Erste Stelle von Teilstring T$ in Gesamtstring G$ nehmen): 
100 PRINT INSTR("WEGE","E") Ausgabe von 2 für 2. Stelle. 


100 LET 2$=INSTR("WEGE","E",3) Ausgabe von 4, da erst ab der 
3. Stelle gesucht wird. 

100 PRINT INSTR("WEGE","GE") Ausgabe von 3 für 3. Stelle. 

100 PRINT INSTR("WEGE","B") Ausgabe von O0 für 'Fehler'. 


INT(2) 
(Ganzzahliger (integer) Teil von Zahl 2): 
100 PRINT INT(54.67) Ganzzahliger Teil von 54.67 ist 54. 


JOY(Z) 
(Joystick Z (1 oder 2) abfragen): 
100 IF JOY(1)=5 THEN 200 Joystick 1 nach unten, dann ... 


LEFT$(S$,L) 
(Linker Teilstring der Länge L in S$): 
100 PRINT LEFT$("BASIC",3) Die 3 linken Stellen sind "BAS". 


LEN(S$) 
(Länge, d.h. Anzahl der Zeichen von S$): 
100 PRINT LEN("MWST") Länge des Strings "MWST" ist 4. 


LOG{X) 
(Natürlichen Logarithmusvvon X angeben): 
100 PRINT LOG(10) Nat. Logarithmus von 10 ist 2.30258509. 


MID$(S$,S,L) 
(Mittlerer Teilstring von S$): 
100 PRINT MID$("BASIC",2,3) Ab 2. Stelle 3 St. lang: "ASI" 
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POS(0) 
(Spaltenposition des Cursors; 0 ganz links): 
100 PRINT POS(0) Derzeitige Cursorposition ist z.B. 14. 


RIGHT$(S$,L) 
(Rechter Teilstring der Länge L in S$): 
100 PRINT RIGHT$("MBASIC",2) Die 2 rechten Zeichen: "IC" 


RND(X) 
(Zufallszahl auswählen): 
100 PRINT RND(1) Zufallszahl zwischen 0 und 1 z.B. 0.56223. 


SGN(Z) 
(Vorzeichen von Zahl 2): 
100 ON SGN(E)+2 GOSUB 100,200,300 Verzweigung nach 100, 200 
bzw. 300 für E negativ (-1), null (0), positiv (1). 


SIN(X) 
(Sinusfunktion) 


SOR(X) 
(Quadratwurzel von X): 
100 PRINT SOR(49) Quadratwurzel von 49 ist 7. 


sST 
(Status eines Gerätes wie z.B. der Floppy bereitstellen): 
100 IF ST<>0 THEN PRINT "FEHLER" (z.B. ST=64 für Dateiende). 


STR$(Z) 

(Zahl Z in einen String umwandeln): 

100 LET W$=STR$(45) zahl 45 als String "45" mit Länge 2. 
TAB(X) 

(Tabulator-Funktion zur Ausgabe): 

100 PRINT TAB(8);"A" "A" wird in Spalte 8 ausgegeben. 
TAN(X) 


(Tangensfunktion) 


TI 
(Interne Uhr lesen (TI jede 1/60stel Sek. um 1 erhöht)): 
100 PRINT TI Ausgabe z.B. 18000, wenn das Gerät 18000 mal 
1/60 Sekunden (5 Minuten) angeschaltet war. 


TI$ 
(Tageszeit als String "hhmmss" (h=Std., m=Min., S=Sek.) 
100 LET TI$="093000" Interne Uhr auf 9.30 Uhr stellen. 


USR(2Z) 
(Maschinenprogramm aufrufen mit Startadresse in 1281,1282) 


VAL(S$) 
(String S$ in numerischen Wert umwandeln): 
100 LET N=VAL('"347") "347" wird 347 (VAL("347DM") wird 0). 
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2.3.2.3 Anweisungen und Kommandos für den Zugriff 
auf externe Einheiten 


Externe (also außerhalb des Hauptspeichers als Internspeicher 
befindliche) Einheiten werden durch Gerätenummern angesprochen 
wie: 


GERÄTENUMMER: EXTERNE EINHEIT: 
8 (auch 9-15) Diskette, Floppy 
4 (auch 5) Drucker 
3 Bildschirm 
1 Kassette 
0 Tastatur 


Diese Nummern müssen in den Befehlen jeweils angegeben werden. 
Die folgenden Beispiele beziehen sich in erster Linie auf die 
Diskette, also auf die Gerätenummer 8. 


BACKUP 
(Duplizieren einer ganzen Diskette): 
BACKUP DO TO DI Diskette in Laufwerk 0 auf die Diskette in 
Laufwerk 1 kopieren (dabei ggf. anlegen). 


CLOSE 
(Schließen einer logischen Datei): 
100 CLOSE 1 Datei mit logischer Dateinummer 1 schließen. 
100 CLOSE Alle derzeit offenen Dateien schließen. 


CMD 
(Datenkanal offenhalten: z.B. Drucken statt zum Monitor): 
OPEN 1,4: CMD1: LIST: PRINT#1: CLOSE Kanal 1 zum Drucker 
(Gerät 4) öffnen, Programm listen, Kanal schließen). 


COLLECT 
(Inventur des Disketten-Inhaltsverzeichnisses vornehmen): 


COLLECT DO "Hausputz" machen: Unbenutzte Sektoren löschen 
COPY 

(Kopieren einer Datei auf einer Diskette): 

COPY DO,"PROG" TO D1,"PROG" Von Laufwerk DO nach DI. 

COPY DO,"PROG" TO D1,"NEU" Zielprogramm umbenennen. 

COPY Di TO DO Alle Dateien von D1 auf DO. 
DIRECTORY (Disketten-Inhaltsverzeichnis zeigen): 

DIRECTORY Alle Dateien zeigen im Laufwerk DO. 

DIR DI Alle Dateien im Laufwerk D1I (DIR mit 'groß R'). 
DLORAD 


(Laden eines Programms von Diskette in den RAM): 

DLOAD "TEST" RAM löschen und eine Kopie des Programms TEST 
von Diskette in den RAM bringen. 

DLOAD "TEST" ,D1 Von Diskettenlaufwerk 1 laden. 

100 DLOAD "TEST" TEST laden und starten (Verkettung). 
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DSAVE 

(Speichern bzw. Retten eines Programms auf Diskette): 

DSAVE "TEST" Eine Kopie des gesamten RAM-Inhaltes unter dem 
Namen TEST auf Diskette erstmalig abspeichern. 

DSAVE '"@TEST" Wie oben, aber das bereits auf Diskette unter 
gleichem Namen abgelegtes Programm überschrei- 
ben (Zeichen "@" zum Überschreiben). 

DSAVE (F$) Programmname ist in F$ gespeichert. 


GETH# 
(Ein einzelnes Zeichen von einer Datei lesen): 
100 OPEN 2,8,3,"DATEI,S,R" 
110 GET#2,E$: IFE$="" THEN 110 Zeichen nach E$ einlesen. 
120 CLOSE 2 


HEADER 
(Anlegen einer neuen Diskette): 
HEADER "UEB",DO0,I01 Diskette UEB in DO (Identifikation 01). 
HEADER DO Name und Identifikation beibehalten. 


INPUTH# 
(Daten von einer sequentiellen Datei lesen): 
100 OPEN 2,8,3,"DATEI,S,R" 
110 INPUT#2,B$,U Die nächsten beiden Daten (Trennungszei- 


120 CLOSE 2 chen dazwischen) nach B$ und U einlesen. 
LOAD 

(Laden eines Programms von Datasette in den RAM): 

LOAD "TEST4" Hauptspeicher RAM löschen und eine Kopie 


von Programm TEST4 in den RAM bringen. 


OPEN 

(Öffnen einer logischen Datei zur Vorbereitung des 

Datenverkehrs mit einem externen Gerät): 

100 OPEN 1,4 Drucker mit Gerätenummer 8. 

100 OPEN 1,8,15 Öffnen des Befehls- und Fehler- 
kanals (Sekundäradresse 15 eigens für diesen Kanal). 

100 OPEN 2,8,3,"DATEI,S,R" Segq. Datei (S) namens DATEI auf 

100 OPEN 2,8,3,"DATEI,S,W" Diskette (8) zum Lesen (R), 

100 OPEN 2,8,3,"DATEI,S,A" Schreiben (W) bzw. Anhängen (A). 


PRINTH 
(Schreiben auf eine sequentielle Datei): 
100 OPEN 2,8,3,"DATEI,S,W" Datei zum Schreiben Öffnen und 
110 PRINT#2,B$;",";U als nächste Daten B$ und U in 
120 CLOSE 2 die UmsatzDATEI speichern. 


RUN 
(Programm in den RAM laden und ausführen): 
RUN "RECH" Derzeitigen RAM-Inhalt löschen, Programm RECH 
von Diskette laden und RECH dann ausführen. 


RENAME 
(Umbenennen einer Datei auf Diskette): 
RENAME "ALT" TO "NEU" Programm ALT in NEU umbenennen. 
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SAVE 
(Speichern bzw. Retten eines Progamms auf Kassette): 
SAVE "RECH" Inhalt des RAM unter dem Programmnamen RECH 


auf Datasette speichern. 
SAVE "RECH",1 Gleichbedeutend mit: SAVE "RECH" 


SCRATCH 
(Löschen einer Datei auf Diskette): 
CLOSE Alle Dateien schließen und Programm PROGI 
SCRATCH "PROGI" im Laufwerk DO löschen (ARE YOU SURE?) 


VERIFY 
(Vergleichen eines Progammes im RAM und auf Diskette): 
VERIFY "RECH",8 Kontrollvergleich des Programms RECH. 


2.3.2.4 Anweisungen und Funktionen für Grafik und Musik 


BOX 
(Rechteckige Figuren zeichnen): 
100 BOX (Zonen-#),X1,Y1,X2,Y2,(,Drehwinkel) (,Farbe) 


Farbzonen-# 0-3 (O=Hintergrund, 1=Vordergrund, 
2=Mehrfarbenl, 3=Mehrfarben2, 4=Rand). 

X1,Y1 Ecke oben links (Zeile,Spalte). 

x2,Y2 Ecke unten rechts. 

Drehwinkel Im Uhrzeigersinn um den Rechtecknmittel- 
punkt (Standard=0 Grad). 

Farbe 1=mit Farbe füllen, O=aus (Standard=0). 


100 BOX 1,0,0,50,50 Rechteck (Cursor steht in 50,50). 

100 BOX ,0,0,319,199 Gesamter Bildschirm aussen eingerahnmt. 
100 BOX ,0,0,50,50,,1 Rechteckfläche eingefärbt. 

100 BOX ,0,0,50,50,135 Rechteck um 135 gedreht (Rhombus). 


CHAR 
(Einsetzen eines Strings in den Grafik-Bereich): 
100 CHAR (Zonen-#),X,Y(,(String)(,REVERS)) 


Farbzonen-# 0-3 


X Spalte 0-39 von links nach rechts. 
Y Zeile 0-24 von oben nach unten. 
String Falls zu lang: vorne weiterschreiben. 
REVERS 1=Blinken an, O0=Blinken aus. 
100 CHAR 1,'"TIP",2,3 String "TIP" in 3. Spalte/4. Zeile. 
100 CHAR ‚"TIP",2,3 Wie oben, da 1=Default=Standard. 


, 
100 CHAR 0,'"TIP",2,3 "Tip" löschen, da Hintergrund. 
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CIRCLE 
(Kreise, Ellipsen, Kreisausschnitte bzw. Vielecke zeichnen): 
100 CIRCLE (2-#),(X,Y),RX,(RY),(Bogen1),(Bogen2), (Dreh), (Wi) 


zonen-# Farbzonen 0-3. 
X,Y Mittelpunkt (CursorpositionsStandard). 
RX Radius in Richtung X-Achse (waagerecht). 
RY Radius in Richtung Y-Achse (RX=Standard) 
Bogen! Bogen zeichnen von ... Grad (0=Standard) 
Bogen2 Bogen bis ... (360=Standard=Vollkreis). 
Dreh Drehung im Uhrzeigersinn (0 Grad=Stan- 
dard, d.h. oben 'bei 12 Uhr' beginnend). 
Wi Winkel zwischen 2 Kreispunkten (2 Grad= 


Standard; 120 ergibt ein Dreieck). 


100 CIRCLE ,160,100,100 Größter Kreis in Bildschirmmitte. 
100 CIRCLE 1,160,100,80,50 Angepaßter Zeilenradius von 50. 
100 CIRCLE ,160,100,40,,,,,90 Um 90 Grad gedreht (=Raute). 
100 CIRCLE ,160,100,80,90,270 Halbkreis (wie 'Schüssel'). 


COLOR 
(Einfärben von geschlossenen Flächen): 
100 COLOR Farbzonen-#, Farb-#,(,Helligkeit) 


Farbzonen-# 0 Hintergrund des Bildschirmes 


1 = Vordergrund (Zeichen) 

2 = Mehrfarben 1 

3 = Mehrfarben 2 

4 = Rahmen bzw. Rand des Bildschirmes 
Farb-# 1 = Schwarz 9 = Orange 

2 = Weiß 10 = Braun 

3 = Rot 11 = Gelbgrün 

4 = Zyan 12 = Rosarot 

5 = Violett 13 = Blaugrün 

6 = Grün 14 = Hellblau 

7 = Blau 15 = Dunkelblau 

8 = Gelb 16 = Hellgrün 


Helligkeit Von O=dunkel bis 7=strahlend hell. 


100 COLOR 4,8,7 Rahmen hellgelb (Standard=4,15,6). 
100 COLOR 1,2 Zeichen weiß (ggf. unsichtbar). 
DRAW 


(Linien und Punkte zeichnen): 
100 DRAW (Farbzonen-#),(X1,Y1,)(TO X2,Y2) 


zonen-# Farbzonen 0-3 
x1,Y1 Anfangspunkt (Standard=Cursorposition). 
x2,YX2 Endpunkt (Standard=X1,Y1, d.h. Punkt). 


100 DRAW ‚0,20 TO 319,120 Linie von 0,20 bis 319,120 ziehen 
100 DRAW 0,0,20 TO 319,120 Linie wieder löschen. 


100 DRAW „ TO 319,120 Linie von Cursorposition an. 

100 DRAW „ 160,100 Punkt 160,100 zeichnen. 

100 DRAW ,O,20 TO 319,120 TO 160,100 Zwei Linien ziehen. 
100 DRAW ,+40,60 TO ... Linie beginnt 40 Pixel rechts und 


60 Pixel unter der Cursorposition 
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G 


RAPHTIC 
(Einstellen eines Grafik-Modus): 


100 GRAPHIC 0 Text-Grafik (X:0-39, Y:0-24) 
100 GRAPHIC 1 Hochauflösende Grafik (X:0-319, Y:0-199). 
100 GRAPHIC 2 HGR und Text gemischt auf Bildschirm: 


Grafik-Bereich oben (X:0-319, Y:0-159), 
Text-Bereich unten (5 Zeilen, 5*8 Pixel). 
100 GRAPHIC 3 Mehrfarben-Grafik (X:0-159, Y:0-199). 
100 GRAPHIC 4 Mehrfarben-Grafik und Text: 
Grafik-Bereich oben (X:0-159, Y:0-159), 
Text-Bereich unten (5 Zeilen je 8 Pixel). 


100 GRAPHIC 1,1 HGR-Grafik ein und Bildschirm löschen. 
100 GRAPHIC 1,0 HGR-Grafik ein, Bildschirm nicht gelöscht. 
100 GRAPHIC CLR Grafik-Bereich gelöscht: für BASIC frei. 


LOCATE 


(Positionieren des Pixel-Cursors): 

100 LOCATE 319,199 Cursor ganz rechts unten (bei Modus 1) 
bewegen (Absolut-Positionierung). 

100 LOCATE -50,+30 Cursor um 50 Pixel nach links und um 30 
Pixel nach unten (Relativ-Positionierung). 

100 LOCATE 1005135 Cursor um 100 Pixel in einem Winkel von 
135 Grad (Relativ-Winkel-Positionierung). 


PAINT 


R 


R 


R 


R 


S 


(Einfärben von geschlossenen Flächen): 
100 PAINT (Farbzonen-#),(,(X,Y)(Modus) 


Farbzone-# 0-3 (1=Standard=Vordergrund). 
X,YX Startpunkt innerhalb der Fläche. 
Modus 1=Nicht-Hintergrundfarbe, O0=Zonenfarbe. 


100 CIRCLE ,160,100,80 Einfärben eines Kreises mit Kreis- 
110 PAINT ‚160,100 mitte als Startpunkt. 
120 PAINT ,0,0 Umgebung des Kreises einfärben. 


CLR (N) 
(Aktuelle Farbnummer einer Farbzone (0-4) angeben): 
100 PRINT RCLR(0O) Ausgabe von z.B. 3=rot für Hintergrund. 


DOT (N) 
(Aktuelle Koordinaten des Pixel-Cursors (X=0, Y=1, Farb=2): 


100 PRINT RDOT(1) Ausgabe z.B. 35 für Y-Position. 

GR (2) 

(Aktuellen Grafik-Modus angeben): 

100 PRINT RGR(1) Ausgabe z.B. 1 für HGR-Grafik (1=dummy). 


LUM (N) 
(aktuelle Helligkeit der Farbzone N angeben): 
100 PRINT RLUM(1) Ausgabe z.B. 7 für hellen Vordergrund. 


CALE 

(Ändern der Skalierung in den Grafik-Modi 1,2,3 und 4): 

100 SCALE 1 Werte 0-1023 für X- und Y-Richtung anstelle 
der Werte 0-159, 0-199 bzw. 0-319. 

100 SCALE 0 Skalierung 0-1023 wieder abschalten. 


SOUND 
(Erzeugen von Tönen und Geräuschen): 
100 SOUND (Stimme-#, Notenwert, Spieldauer) 
Stimme-#: 1 Tongenerator 1 erzeugt Töne. 
2 Tongenerator 2 erzeugt Töne wie 1. 
3 Tongenerator 2 erzeugt Geräusche. 
Notenwert Von 0-1023 (=Frequenzen ca. 0-1700). 
Spieldauer Von O0 bis 65535 (mal 1/50 Sekunen). 


100 SOUND 1,345,25 Note "tiefes E" ca. 1/2 Sekunde lang. 
100 SOUND 3,800,100 Hohes Geräusch. 
100 SOUND O0 Gerade gespielten Ton ausschalten. 


SSHAPE / GSHAPE 
(Grafik-Rechteckflächen als Strings abspeichern und laden) 


VOL 
(Einstellen der Lautstärke): 
100 VOL 8 (Maximale der Lautstärken 0 bis 8). 


2.3.3 Operatoren für Rechnen, Vergleich und Logik 


Die BASIC-Anweisung 
100 PRINT 444*%2+3000 /RET/ 


enthält hinter dem Anweisungswort PRINT einen Ausdruck mit den 
beiden Operatoren "*" (mal) und "+" (plus). In der 
Programmiersprache BASIC sind neben solchen "Rechenoperatoren' 
auch 'Vergleichsoperatoren' und "logische Operatoren' möglich. 
In der Abbildung sind diese Operatoren zusammengestellt. Der 
senkrechte Pfeil verweist auf die Rangfolge, in der diese Ope- 
ratoren ausgeführt werden. 


Operator- Operator Bedeutung: Rangfolge der 
Typ: in BASIC: der Ausführung; 
hoch, 
3} Klammer zuerst 
ij Potenzieren 
Rechen- - Negative Zahl 
Operatoren u | Multiplizieren, Dividieren 
+ - Addieren, Subtrahieren 
= gleich 
<> ungleich 
Vergleichs- > größer als 
Operatoren % kleiner als 
>= größer oder gleich 
= kleiner oder gleich 
AND logisch UND 
Logische OR logisch ODER niedrig, 
Operatoren NOT logisch NICHT zuletzt 


Operatoren in BASIC und Rangfolge ihrer Ausführung 


2.4 Unterschiede BASIC 3.5 — BASIC 2.0 — BASIC 4.0 109 


Operatoren "+" und "=": 


Ein und derselbe Operator kann verschiedene Bedeutungen haben. 
So kann "+" addieren (3+4 ergibt 7) oder verknüpfen ("LE"+"NA" 
ergibt "LENA"). 

"=" kann vergleichen (20 IF X=3 GOTO 90: ist 'X gleich 3'?) 
oder einer Variablen einen Wert zuweisen (40 LET X=3: weise X 
den Wert 3 zu). 

Auf die Operatoren und deren Bedeutungen gehen wir ausführlich 
in Abschnitt 3 anhand von Programmbeispielen ein. 


Stehen in einem Ausdruck mehrere Operatoren, dann werden diese 
entsprechend der in der Übersicht wiedergegebenen Rangfolge 
ausgeführt: In Klammern gesetzte Operationen werden zuerst zur 
Ausführung gebracht (höchster Rang), die logische Verneinung 
dagegen zuletzt (niedrigster Rang). Im obigen Beispiel der An- 
weisung 100 PRINT 444*2+3000 wird zuerst mit "*" verdoppelt, 
um dann mit "+" zur Zahl 888 die Zahl 3000 zu addieren (Opera- 
tor '"*" mit höherem Rang als Operator "+". Durch Klammern kön- 


nen wir die Rangfolge ändern. 


2.4 Unterschiede von BASIC 3.5 gegenüber BASIC 2.0 und BASIC 4.0 


2.4.1 Gemeinsamer Anweisungsvorrat 


Die drei Commodore-Sprachversionen BASIC 2,0, BASIC 4.0 und 
BASIC 3.5 (in dieser Reihenfolge sind sie erschienen) verfügen 
über den folgenden übereinstimmenden Vorrat an Anweisungen: 


Elementare Anweisungen: 

CLR, DATA, DEF FN, DIM, END, FOR-NEXT, GET, GOTO-RETURN, 
GOSUB-RETURN, IF-THEN, INPUT, LET, ON-GOSUB, ON-GOTO, 
POKE, PRINT, READ, RESTORE, REM, STOP, SYS, WAIT 


Anweisungen zum Zugriff auf externe Einheiten: 


CLOSE, CMD, GET#, INPUT#, OPEN, PRINT# 


Funktionen: 

ABS(Z), ATN(Z), ASC(S$), CHR$(Z2), COS(2Z), EXP(2), FN...(2), 
INT(Z), LEFT$(S$,Z), LEN(S$), LOG(Z), MID$(S$,21,22), PEEK(2), 
RIGHT$(S$,Z), RND(2), SGN(Z), SIN(Z), SOR(Z2), STR$(2), TAN(Z), 
USR(Z), VAL(S$) 


Benutzer-Kommandos: 
CONT, COPY, DELETE, LIST, LOAD, NEW, RENAME, RUN, 
SAVE, SCRATCH, VERIFY 


In BASIC 2.0 und 3.5 müssen die Kommandos COPY, DELETE, RENAME 
und SCRATCH über den Befehlskanal 15 und PRINT# abgesandt wer- 
den. 
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2.4.2 Erweiterte elementare Anweisungen von BASIC 3.5 


Gegenüber BASIC 2.0 und BASIC 4.0 ist der Anweisungsvorrat von 
BASIC 3.5 um folgende Anweisungen und Funktionen erweitert: 


- GETKEY Tastaturabfrage 

- KEY Funktionstasten-Belegung 
- SCNCLR Bildschirm löschen 

- PRINT USING/PUDEF Ausgabeformatierung 

- TRAP/RESUME Fehlerbehandlung 


- IF-THEN-ELSE 
- DO-LOOP UNTIL 
- DO WHILE-LOOP 
- DO-LOOP-EXIT 


Verzweigung: Zweiseitige Auswahl 
Nicht-abweisende Schleife 
Abweisende Schleife 

Schleife mit Abfrage in der Mitte 


- DEC(H$) Dezimalen Wert von Hex-String H$. 

- INSTR(S$,T$,B) Stringfunktion: In S$ ab der B. Stelle 
nach Teilstring T$ suchen | 

- HEX$(2) Hexadezimalen Wert von Z ermitteln 

- JOY(2) Joystick 2 (1 oder 2) abfragen 


2.4.3 Anweisungen für den Zugriff auf Diskette 


Das standardmäßig im ROM bereitgestellte BASIC meldet sich mit 
"COMMODORE BASIC V3.5 ....". Dieses BASIC 3.5 umfaßt alle Dis- 
ketten-Anweisungen des BASIC 4.0 mit Ausnahme der Anweisungen 


DOPEN# und DCLOSE# (Datei Öffnen und schließen) 


sowie RECORD# 


(Satzzeiger stellen bei Direktzugriff-Datei). In der Abbildung 


werden die Anweisungen für 


Übersicht der Anweisungsworte: 


-.  „- „zz zz zz oJ... „-— — 


oo > > > >— a > 


den Zugriff auf Diskette 


genannt. 


BASIC 2.0 BASIC 3,5: BASIC 4.0: 
- COLLECT COLLECT 

* COPY COPY COPY 
CLOSE CLOSE DCLOSE# 

* DUPLICATE BACKUP BACKUP 

* INITIALIZE entfällt entfällt 
LOAD LOAD LOAD 
LOAD "5.0.8 DLOAD DLOAD 
LOAD "$",8 DIRECTORY DIRECTORY 
GET# GET# GET# 

* NEW HEADER HEADER 
INPUT# INPUT# INPUT# 
OPEN OPEN DOPEN# 
PRINT# PRINT# PRINT# 

* simuliert simuliert RECORD# 

* RENAME RENAME RENAME 
SAVE SAVE SAVE 
SAVE "..",8 DSAVE DSAVE 

* SCRATCH SCRATCH SCRATCH 
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Der Befehlskanal wird in BASIC 4.0 immer und in BASIC 3.5 
mit Ausnahme der RECORD#-Anweisung automatisch eröffnet. Bei 
den mit * gekennzeichneten Anweisungen muß der Befehlska- 
nal 15 dagegen mittels OPEN eröffnet werden, um dann mittels 
PRINT# z.B. die Anweisung RENAME wie folgt zu übermitteln: 


BASIC 2.0: BASIC 3.5 und BASIC 4.0: 
OPEN 1,8,15 

PRINT#1,"RENAME: NEU=ALT" RENAME "ALT" TO "NEU" 
CLOSE 1 


Der Dreischritt "OPEN-PRINT#-CLOSE" reduziert sich zu einer 
einzigen Anweisung. 


Diskettenzugriff in BASIC 3.5 sowie BASIC 2.0 und BASIC 4.0 


2.4.4 Anweisungen, die nur BASIC 3.5 kennt 


Neben den in Abschnitt 2.4.2 bereits genannten Anweisungen 
GETKEY, KEY, TRAP-RESUME, PRINT USING, IF-THEN-ELSE, SCNCLR, 
DO-UNTIL LOOP, DO WHILE-LOOP, DO-LOOP-EXIT und den Funktionen 
DEC, HEX$, INSTR und JOY sind die folgenden Grafik- und Musik- 
anweisungen sowie Programmierhilfen weder in BASIC 2.0 noch in 
BASIC 4.0 vorgesehen. 


Anweisungen für Grafik und Musik (nur in BASIC 3.5): 


- BOX Rechtecke zeichnen 

- CHAR Text in Hires-Grafik einfügen 

- CIRCLE Kreise und Ellipsen zeichnen 

- COLOR Farbe einstellen für Rahmen und Hintergrund 

- DRAW Punkte und Linien zeichnen 

- GRAPHIC Grafik-Modus einstellen (Text bzw. Hires) 

- LOCATE Cursor positionieren 

- PAINT Mit Farbe füllen 

- RCLR{N) Farbe der Bildschirmzone N (0-4) zuordnen 

- RDOT(N) Position des Grafik-Cursors angeben 

- RGR(N) Augenblicklichen Grafik-Modus nennen 

- RLUM(N) Farbintensität der Farbzone N nennen 

- SCALE Skalierung der Bitmuster von Hires- und Multi- 
color-Grafik ändern 

- SSHAPE Teil der Hires-Grafik auf Diskette speichern 

- GSHAPE Hires-Grafik von Diskette auf den Bildschirm 
bringen 

- SOUND Musik einstellen 


- VOL Lautstärke einstellen 
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Benutzer-Kommandos als Programmierhilfen (nur in BASIC 3.5): 


- AUTO Automatische Numerierung von Programmzeilen 
- RENUMBER Zeilennumerierung selbst ändern 

- TRON-TROFF Trace-Lauf (Ausführung in Einzelschritten) 

- DELETE Programmbereiche löschen 

- HELP Fehlerbereich aufzeigen 

- MONITOR Maschinensprache-Monitor von BASIC aufrufbar 


Maschinensprache-Monitor TEDMON mit 11 Befehlen: 


- Assembler und Disassembler 

- Speicherauszug mit ASCII-Anzeige 
- Register-Anzeige 

- Speicher oder Register ändern 

- Datentransfer 

- Datenvergleich 

- Suchfunktion 

- Speicher mit Bytes füllen 

- LOAD, SAVE und VERIFY Speicher 

- Maschinenprogramm ausführen 

- Monitor verlassen und in BASIC zurückkehren 


2.4.5 Programmausführung auf anderen Commodore-Computern 


2.4.5.1 Ausführung auf CBM-Serien 4000 und 8000 


BASIC 3.5 und BASIC 4.0: 

Commodore-Computer der Serien 4000/8000 laufen mit BASIC 4.0. 
BASIC 3.5 ist aufwärtskompatibel zu BASIC 4.0 . Das bedeutet, 
daß ein "reines" BASIC-Programm, das auf einem C-16, cC-116 
oder plus/4 in der ROM-Sprache BASIC 3.5 geschrieben wurde, 
auch auf größeren PCs von Commodore läuft, die in BASIC 4.0 
programmierbar sind. "Rein" beinhaltet, daß das jeweilige Pro- 
gramm ohne Tricks, die auf die spezielle Rechnerstruktur abhe- 
ben, arbeiten muß (PEEK, POKE, ...) und keine Zusatzanweisun- 
gen (z.B. Grafik, Musik, Schleifensteuerung mit WHILE) enthal- 
ten darf. 


Anfangsadressen der BASIC-Programmspeicher: 

wollen wir ein auf dem C-16, C-116 oder plus/4 erstelltes Pro- 
gramm auf einem CBM-Computer der Serien 2000, 3000, 4000 oder 
8000 (z.B. auf einem CBM 8032) laufen lassen, so geht das von 
den BASIC-Versionen her betrachtet in jedem Falle (Aufwärts- 
kompatibilität). 

Dennoch kann das C-16-Programm nicht gestartet werden, da es 
an der 'falschen' RAM-Adresse gesucht wird. 
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Commodore-Computer der Serien 2000/3000/4000 und 8000 suchen 
den Anfang eines BASIC-Programms bei Adresse 1025 im RAM. Beim 
C-16/plus/4 hingegen liegt diese Anfangsadresse bei 4097. La- 
den wir ein auf dem C-16 bzw. plus/4 geschriebenes Programm 
auf einem CBM 8032 „ so wird es durch LOAD wieder ab Adresse 
4097 abgelegt. Der LOAD-Befehl funktioniert also. 

Tippen wir RUN ein, dann sucht der BASIC-Interpreter den Pro- 
grammanfang an Adresse 1025. Da an diesem Speicherplatz nichts 
steht, kann das BASIC-Programm nicht zur Ausführung gebracht 
werden. 

Abhilfe schafft folgende Anweisungsfolge, die wir vor der 
Eingabe des LOAD-Befehls im direkten Dialog eintippen: 


POKE 40,1 /RET/ 
POKE 41,16 /RET/ 
POKE 16*256,0 /RET/ 
NEW /RET/ 


Durch diese POKE-Anweisungen setzen wir die Zeiger, die auf 
den Anfang eines BASIC-Programms zeigen, von ursprünglich 1025 
auf 4097 (der CBM-Computer wird also "angeschwindelt'). Der 
Anfangszeiger steht als 2-Byte-Adresse in den Adressen 40 und 
41 (Lowbyte 1 in 40 plus Highbyte 16*256=-4096 in 41 ergibt die 
Anfangsadresse 4097). Auf 2-Byte-Adressen gehen wir später in 
Abschnitt 3.5.5.1 genauer ein. 


Laden wir Programme in den C-16 und plus/4, die auf Commodore- 
Computern der Serien 2/3/4/8000 geschrieben wurden, so treten 
diese Schwierigkeiten mit der Anfangsadresse nicht auf. 

Grund: Der C-16 bzw. plus/4 ist etwas intelligenter und lädt 
BASIC-Programme automatisch an den Anfang seines Programmspei- 
chers, also an Adresse 4097. 

Gleichgültig, ob diese Programme zuvor durch den Befehl DSAVE 
bzw. SAVE den Adreßvermerk 1025 bzw. 4097 erhielten. 


2.4.5.2 Ausführung auf dem Commodore 64 


BASIC 2.0 und BASIC 3.5: 

Standardsprache des Commodore 64 ist BASIC 2.0. Da BASIC 2.0 
aufwärtskompatibel zu BASIC 3.5 ist, können alle auf dem Con- 
modore 16, 116 bzw. plus/4 geschriebenen Programme auch auf 
einem Commodore 64 zur Ausführung gebracht werden, sofern sie 
'nur' die Sprachelemente von BASIC 2.0 aufweisen. Diese Kompa- 
tibilität gilt nicht für Grafik und Musik: einerseits 
kennt der C-64 die erweiterten Grafik- und Musikanweisungen 
des C-16 und plus/4 nicht, andererseits verarbeitet der C-16 
und plus/4 z.B. die Sprites des C-64 nicht. 

Ist auf dem Commodore 64 das BASIC 4.0 verfügbar (über Modul 
oder Software), können natürlich auch die entsprechenden Dis- 
kettenbefehle genutzt werden. 


Anfangsadressen der BASIC-Programmspeichers:; 
Der Commodore 64 lädt jedes BASIC-Programm automatisch an den 
Anfang seines Programmspeichers, also in die Adresse 2049. Der 
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Commodore 16, 116 bzw. plus/4 verfährt ebenso, nur liegt seine 
Anfangsadresse bei 4097. Aus diesem Grunde hat man bezüglich 
des Programmstartes mit RUN keinerlei Schwierigkeiten. 


2.4.5.3 Ausführung auf CBM-Serien 2000 und 3000 


Auf Commodore-Computern der Serien 2000 und 3000 ist BASIC 2.0 
im ROM verfügbar. Was die Sprachvereinbarkeit von BASIC 2.0 
und BASIC 3.5 angeht, gilt somit dasselbe wie für den Commo- 
dore 64. 

Hinsichtlich der Anfangsadresse des BASIC-Programmes sind die 
CBM-Serien 2000 und 3000 jedoch nicht so intelligent wie der 
Commodore 64. Wir müssen also wieder die Adreßverschiebung 


POKE 40,1: POKE 41,16: POKE 16%*256,0: NEW /RET/ 


vornehmen (vgl. Abschnitt 2.4.5.1), um ein auf dem C-16, C-116 
oder plus/4 geschriebenes Programm laufen zu lassen. 


2.4.5.4 Ausführung auf CBM-Systemfamilie 700 


Um Programme, welche auf dem Commodore 16, 116 bzw. plus/4 ge- 
schrieben und z.B. auf einer Floppy 1541 abgespeichert wurden, 
auf einem Computer der Familie CBM 700 ausführen zu können, 
sind zwei Punkte zu beachten: 


1. Die CBM 700-Geräte arbeiten mit Extended BASIC 4.0, das 
die elementaren Anweisungen von BASIC 3.5 umfaßt. Von daher 
ergeben sich kaum Schwierigkeiten. 


2. Das Disketten-Aufzeichnungsformat hingegen ist nicht 
mit der Floppy 1541 bzw. CBM 4040 kompatibel. Das bedeutet, 
daß die Programme zunächst überspielt werden müssen. Dazu 
ein Beispiel: An den Computer wird eine Floppy 4040 sowie 
eine Floppy 8050 bzw. 8250 angeschlossen, um dann alle Pro- 
gramme von der Floppy 4040 (kompatibel mit dem Aufzeich- 
nungsformat der Floppy 1541) auf die Floppy 8050 (kompati- 
bel mit dem Format der Familie CBM 700) zu kopieren. 
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2.5 Built-In-Software des Commodore plus/4 


Nach dem Einschalten des Commodore plus/4 erscheint am Bild- 
schirm diese Meldung: 


COMMODORE BASIC V3.5 60671 BYTES FREE 
3-PLUS-1 ON KEY FI 


Unter der Mitteilung, daß genau 60671 Bytes an Speicherplatz 
für den Benutzer zur freien Verfügung stehen, erscheint die 
Einladung, die Funktionstaste /F1/ zu drücken, um mit der ein- 
gebauten Software zu arbeiten. 

'Eingebaut' heißt, daß die entsprechenden Programme in einem 
ROM bzw. Festwertspeicher bereits gespeichert sind - genau wie 
der Interpreter der Standardsprache BASIC 3.5. Es handelt sich 
dabei also um Firmware (vgl. Abschnitt 1.4). 


Tippen wir /F1/, so erscheint am Bildschirm diese Mitteilung: 
SYS 1521 : 3-plus-1 


Nach Drücken der /RET/-Taste befinden wir uns im ersten von 
drei eingebauten Programmen, einem Textverarbeitungsprogramm. 
Die beiden anderen Programme - eine Tabellenkalkulation sowie 
eine Dateiverwaltung - können von der Textverarbeitung heraus 
aufgerufen werden. 


Durch die Eingabe von 
TC /RET/ 


(für 'To Calculator') rufen wir von der Textverarbeitung aus 
die Tabellenkalkulation auf. Mit der Eingabe von 


GR J/RET/ 


(für 'GRaphic') aktivieren wir das Grafik-Paket. Das 'plus-1' 
bezieht sich auf dieses zusätzliche ROM-residente Programm. 


Die drei Commodore-Computer C-16, C-116 und plus/4 weisen alle 
das BASIC 3.5 aus Standardsprache auf. Aus diesem Grunde las- 
sen sie sich im Hinblick auf die Programmiersprache gleich be- 
handeln. 

Im Hinblick auf weitere fest eingebaute Software nimmt der 
plus/4 eine Sonderstellung ein: Nur im plus/4 sind solche Pro- 
gramme eingebaut. 
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3.1 Grundlegende Programmstrukturen an Beispielen 


Wie in Abschnitt 1.3.3 dargestellt, lassen sich aus den vier 
grundlegenden Programmstrukturen 


- Folgestrukturen (linear, geradeaus) 

- Auswahlstrukturen (vorwärts verzweigend) 

- Wiederholungsstrukturen (rückwärts verzweigend, Schleife) 
- Unterprogrammstrukturen (unterteilend) 


alle nur denkbaren Programmabläufe konstruieren. Im vorliegen- 
den Abschnitt 3.1 wird zu jeder Programmstruktur ein in sich 
abgeschlossenes Demonstrationsbeispiel angegeben und erklärt. 
Programmierspache: BASIC 3.5 auf Commodore 16, 116 und plus/4. 


3.1.1 Lineare Programme 


3.1.1.1 Codierung und Ausführungen zu einem Programm 


Den Unterschied zwischen der Codierung eines Programmes und 
dessen Ausführungen erklären wir anhand unseres "ersten Pro- 
grammes' VERBRAUCHI (vgl. Abschnitt 2.2). 

Jedes Programm hat einen Namen. Ein Programm namens VERBRAUCH]I 
ermittelt den durchschnittlichen Benzinverbrauch für einen Pkw 
mit einem Tankinhalt von 60 Litern. Die Codierung sowie zwei 
Ausführungen sehen wie folgt aus: 


Codierung zu VERBRAUCHI: Zwei Ausführungen zu VERBRAUCHI: 
14 LETT = 659 EINGABE: GEFAHRENE KM 
za PRINT "EINGABE: GEFAHRENE KM" 530 
38 INFUT K AUSGABE: LITER/IES KM 
4a LETD = IE ET CK 12 
sa FEINT "AUSGABE: LITER/108 kn" 
BE FRINT D 
a EHI 
EINGABE: GEFAHRENE KM 
24 
AUSGABE: LITERiAM Km 
11.2ra11dr 


Tippt man den Befehl RUN ein, so wird das Programm ausgeführt: 
Der Computer gibt den Text "EINGABE: GEFAHRENE KM" aus .„ Der 
Benutzer gibt 600 ein, der Computer berechnet 10 L als Durch- 
schnittverbrauch, um dann den Text "AUSGABE: LITER/100 KM" und 
die Zahl 10 auszugeben. Bei der zweiten Ausführung entwickelt 
sich ein ähnlicher Mensch-Computer-Dialog, nur wird dabei von 
542 km ausgegangen. Beide Programmausführungen (auch Programm- 
läufe oder Dialogprotokolle genannt) werden dem Computer durch 
Anweisungen befohlen, die man sich durch Eintippen des Befehls 
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LIST zeigen lassen kann. Das in der Programmiersprache BASIC 
codierte Programm VERBRAUCH1 umfaßt sieben Zeilen mit den Zei- 
lennummern 10-70 sowie vier Anweisungsarten LET, PRINT, INPUT 
und END. Das Programm wird Zeile für Zeile linear ausgeführt: 


10 LET T=60 
Weise die Zahl 60 nach T (wie Tankfüllung) zu. 


20 PRINT "EINGABE: GEFAHRENE KM" 
Gib am Bildschirm den zwischen " " stehenden Text aus. 


30 INPUT K 
Warte auf eine Tastatureingabe und weise diese Eingabe 
dann der Variablen K (für Kilometer) zu. 


40 LET D=100*T/K 
Rechne 100 mal T durch K aus und weise das Ergebnis dann 
der Variablen D (für Durchschnittverbrauch) zu. 


50 PRINT "AUSGABE: LITER/100 km" 
Gib am Bildschirm den zwischen " " stehenden Text aus. 


60 PRINT D 
Gib am Bildschirm den Inhalt der Variablen D aus. 


70 END 
Beende die Ausführung des Programms VERBRAUCHI. 


Jede Programmzeile enthält eine Zeilennummer (z.B. 30) mit 
Anweisungswort (z.B. INPUT) und Anweisungsargument (z.B. K). 


30 INPUT K 


Zeilennummer (häufig 10,20,30,..».) 
Anweisungswort (... was der Commodore tun soll) 
-Anweisungsargument (Ausdruck; kann .entfallen) 


Aufbau der BASIC-Programmzeile an einem Beispiel 


Die Codierung (auch Listing oder einfach Programm genannt) be- 
steht aus einer Folge von computerverständlich in BASIC formu- 
lierten Anweisungen. Dass einmal codierte Pro- 
gramm kann dabei mehrmals ausgeführt wer- 
den, wobei sich die Ausführungen je nach Eingabewerten unter- 
scheiden können, die Codierung aber unverändert zugrundeliegt. 


Dies wird ermöglicht durch die Verwendung von Variablen (vgl. 
Abschnitt 1.3.4.2), hier durch die numerischen Variablen K und 
D. Während K und D ihren Inhalt (Wert) ändern, bleibt dieser 
bei T mit 60 Litern fest bzw. konstant: T ist eine Konstante. 
Daten können als Variablen ode Konstanten 
im Programm vorgesehen sein; hier liegen numerische Daten vor. 
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zu den Anweisungsarten LET, PRINT, INPUT und END, die im Pro- 
gramm VERBRAUCHI zur Ausführung kommen: 


Die LET-Anwe is ung dient der Berechnung. Sie er- 
mittelt den Wert des rechts neben dem Zuweisungszeichen "=" 
angebenenen Ausdruckes und weist dieses Ergebnis in die links 
von "=" stehende Variable zu. Bei LET (für (zu)lassen) darf 
links vom Zuweisungszeichen "=" immer nur eine Variab- 
le stehen. 


Die PRINT - Anweisung dient der Ausgabe von 
Text oder Variableninhalten. Text wird dabei stets innerhalb 
von Gänsefüßchen " " angegeben. Programm VERBRAUCHI gibt in 


den Zeilen 20 und 50 Texte aus, z.B. "EINGABE: GEFAHRENE KM". 
In der Zeile 60 wird kein Text, sondern der Wert einer Varia- 
blen ausgegeben (deshalb 60 PRINT D und nicht 60 PRINT "D"). 


Die INPUT - Anweisung dient der Eingabe von Wer- 
ten über die Tastatur und deren Zuweisung in eine Variable. In 
zeile 30 wird dem Commodore durch die Anweisung 30 INPUT K 
folgendes befohlen: "Warte auf unsere Tastatureingabe und wei- 
se den eingetippten (Zahlen-)Wert dann der Variablen K zu". 


Die End - Anweisung hat kein Argument und been- 
det die Programmausführung. 


LET a2 BERECHNUNG und WERTZUWEISUNG mit dem "=" 
als Zuweisungszeichen,. 


PRINT ... AUSGABE vom Commodore auf eine Ausgabe- 
einheit (wie z.B. auf den Bildschirm). 


INPUT ... EINGABE von einer Eingabeeinheit (wie z.B. 
von der Tastatur) in den Commodore. 


END BEENDIGUNG der Ausführung eines mit dem 
Befehl RUN gestarteten Programmes. 


Vier BASIC-Anweisungen des Programmes VERBRAUCH]I 


3.1.1.2 Anweisungsfolge Eingabe - Verarbeitung - Ausgabe 


Jedes Programm läuft in der Folge Eingabe-Verarbeitung-Ausgabe 
ab, auch als EVA-Prinzip bezeichnet (vgl. Abschnitt 1.2.2.1). 
Im folgenden Programm namens PREISSENKUNG! zeigt sich dieser 
Dreier-Schritt in den Zeilen 20, 30 und 40. 


Die REM-Anweisung (engl. remark für Bemerkung) ermöglicht das 
Einfügen von Bemerkungen, die n u r bei LIST erscheinen, nicht 
aber bei RUN. So erscheint der Programmname PREISSENKUNGI bei 
den Ausführungen nicht. 
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Codierung zu Programm PREISSENKUNGI!: 


18 REM ====== PRÜGERMM PREISSENKUNGI 
28 INFUT "ALTER PREIS":P 
3S8LETP=P-P%* 15 / 100 

44 PRINT "NEUER PREIS:";P 

58 END 


Zwei Ausführungen zu PREISSENKUNG]I: 
ALTER PREIS? 308 ALTER PREIS? 4925.65 
NELIER PREIS: 255 NEUER PREIS: 4186. 80925 


Die Zeile 20 hätte man auch umständlicher codieren können als 


20 PRINT "ALTER PREIS:"; (wichtig: ; am Zeilenende) 
21 INPUT P 


Da vor jedem INPUT ein PRINT stehen sollte (sonst weiß man ja 
nicht, was überhaupt einzutippen ist), kann man mit Anweisung 


20 INPUT "ALTER PREIS";P 
die Eingabeanforderung mit der Eingabe zusammen in einer 


INPUT-Anweisung programmieren. 


In der Abbildung sind fünf typische Beispiele zur LET-Anwei- 
sung wiedergegeben. Insbesondere die als letztes Beispiel dar- 
gestellte Anweisung 30 LET P=P-Pp*15/100 verdeutlicht den Un- 


terschied zwischen dem Zuweisungszeichen ("=": weise zu von 
rechts nach links) einerseits und dem mathematischen Gleich- 
heitszeichen ("=": links gleich rechts) andererseits. 


Allgemeine Form: 
.„.. LET Variablenname = Ausdruck 


Fünf typische Beispiele: 


EEE EEE. ME N. (N ME ME MEN TON HN rm: Mm „im: Mm immens EHE BEE a 


0100 LET B=6 weist der Variablen B den Wert 6 zu. 
5 45 LET G=V+3 addiert den Inhalt von V und 3 und weist das 
Ergebnis der Variablen V zu. 
180 LET 2=2+1 erhöht den Wert von 2 und 1. 
90 LET X1=X1/2 halbiert den Wert der Variablen X1. 


0 30 LET P=P-p#15/100 vermindert P um 15 Prozent. 


| | rege 1. 200%15/100 ergibt 30 (200 in P) 
| 2. 200-30 ergibt 170 (200 in P) 
er re 3. Weise 170 nach P zu (200 ersetzt 


durch 170) 


LET-Anweisung mit "=" als Wertzuweisungszeichen 
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Die im Programm PREISSENKUNG] enthaltene Ausgabeanweisung 
40 PRINT "NEUER PREIS";P 


zeigt, wie man sich konstanten Text ("NEUER PREIS: ") und vVa- 
riableninhalt (Variable P) nebeneinander ausgeben lassen kann: 
Das ";" trennt beide Größen ohne Leerzeichen (auch Blanks ge- 
nannt). 

Auf die Gänsefüßchen kommt es an: PRINT "P" würde den Buchsta- 
ben P am Bildschirm zeigen, PRINT P jedoch gibt den Wert der 
Variablen P aus. 


3.1.1.3 Übersichtliche Programmgliederung 


Jedes Anwenderprogramm gliedert man - unabhängig von Computer- 
typ und Programmiersprache (siehe Abschnitt 1.3.4.3) - in die 
drei Teile 


Programmname, 
Vereinbarungsteil und 
Anweisungsteil. 


In BASIC ist diese explizite Dreiteilung nicht unbedingt er- 
forderlich. Insbesondere bei umfangreichen, langen Programmen 
sollte man die Dreiteilung aber mit REM-Anweisungen markieren. 
Das Programm PREISSENKUNG2 sieht diese Dreiteilung vor, wobei 
die Teile durch Leerzeilen und REMs getrennt werden (der Dop- 
pelpunkt ":'" dient zur Darstellung von Leerzeilen). Die Zeilen 
100-130 und 150-170 dienen allen der Erläuterung der drei Pro- 
grammteile; das Programm PREISSENKUNG2 würde auch ohne diese 
Zeilen laufen. 


Zum Datentyp INTEGER: 

Im Vereinbarungsteil des Programmes PREISSENKUNG2 wird S% als 
Ganzzah1l - Konstant e vereinbart (INTEGER für 
ganzzahlig) und P als Dezimalzahl-Variable (REAL=Kommazahl). 


Codierung zu Programm PREISSENKUNG2: 


1a REM ====== FRÖGRAMM PREISSENEUNGE 

iia : 

120 REM ======YEREINERRUHNGSTEIL 

130 REM 5: INTEGEF \FREISSENKUNG IH Ss KONSTANT" 
14a LET 5%=15 

12A REM F: REAL FEEIS Y“RRIABEL> 

i6M : 

ivc FEM ======ANWEISUHGSTEIL 

152 FRINT "FEEISSEHKUNG UM 15% ERMITTELH, " 
124 IHPUT "ALTER FREIS?"SF 

zu0 LET F=F-F#37 18 

zii FEIHT "HEUER FREIS:"I F 

z220 PEINT "ENDE": END 
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Zur Trennung von Anweisungen durch ":": 

In BASIC ist es möglich, mehrere Anweisungen durch einen 
getrennt in e i ne Zeile zu schreiben. Aber: lange Zeilen 
sind unübersichtlich und schwer korrigierbar, das Zeichen ":" 
sollte möglichst vermieden werden. In der letzten Zeile von 
PREISSENKUNG2 werden mit dem '":" die Anweisungen PRINT sowie 
END in einer Zeile programmiert. 


Zwei Ausführungen zu Programm PREISSENKUNG2: 


FREISSEHELHNG UM 159% ERMITTELN. FEEISSENKUNG UM Im ERMITTELN. 
ALTER FREIS? ZE0 ALTER FREEIS? 19: 
HELER FREEIS: Ira HELIER FREIES: ss 
EHTDE. ENDE. 


Gleiche Ausführungen - verschiedene Codierungen: 

PREISSENKUNG?! und PREISSENKUNG2 lösen beide dasselbe Problem. 
Die Codierungen unterscheiden sich wesentlich, die Ausführun- 
gen dagegen kaum. Ein und das se 1] be Problem kann oft- 
mls verschieden in BASIC codiert werden. 


3.1.1.4 Programmeingabe und Programmspeicherung 


Soll das Programm PREISSENKUNG2 erstmalig in den Computer ein- 
gegeben werden, geht man zweckmäßigerweise in sieben Schritten 
vor: 


1. Hauptspeicher frei machen: 
Befehl NEW tippen. Ein ggf. im Hauptspeicher RAM befind- 
liches Programm wird gelöscht. 

2. Programmeingabe: 
Programm Zeile für Zeile eintippen und am Ende jeder Zeile 
dabei die RETURN-Taste drücken. 

3. Testläufe: 
Befehl RUN tippen, um das Programm auszuführen und so zu 
testen. Falls fehlerhaft: Korrektur, weiter mit 2. 

4. Codierung überprüfen: 
Befehl LIST tippen und Codierung überprüfen (im Hinblick 
auf Logik und Lesbarkeit). 

5. Programm sicherstellen: 
Befehl DSAVE "PREISSENKUNG2" tippen: Das namenlos im RAM 
stehende Programm wird unter dem Namen PREISSENKUNG2 auf 
Diskette abgespeichert. 
Programm PREISSENKUNG2 befindet sich auf Diskette wie auch 
im RAM. Beide Programmkopien stimmen vollkommen überein. 

6. Speicherungs-Kontrolle: 
NEW tippen, RUN tippen: kein Programm ist mehr ausführbar. 
DLOAD "PREISSENKUNG2" tippen: das Programm PREISSENKUNG2 
wird auf Diskette gesucht und eine Kopie in den RAM gela- 
den. Das Programm kann nun mit RUN ausgeführt werden. 

7. Inhaltsverzeichnis der Diskette prüfen: 
Den Befehl DIRECTORY eintippen: alle auf Diskette abgeleg- 
ten Programme werden angezeigt, so auch PREISSENKUNG2. 
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Hinweis: Ist mit DSAVE ein auf Diskette unter demselben Namen 
schon vorhandenes Programm zu überschreiben, so ist der Befehl 
DSAVE " PREISSENKUNG2" einzugeben (mit Klammeraffe " " für das 
Überschreiben). 

Im RAM ist normalerweise nur e i n einziges Programm gespei- 
chert, auf der Diskette aber stets meh re r e Programme. 


3.1.1.5 Arbeitsschritte zur Programmentwicklung 


Je umfangreicher ein Programm, um so sinnvoller erscheint ein 
geplantes und schrittweises Vorgehen zur Programmentwicklung. 
In Abschnitt 1.3.7 nannten wir als allgemeine Arbeitsschritte: 
Problemstellung, Programmentwurf, Programmierung, Dokumenta- 
tion und Anwendung. 

'Allgemein' heißt, daß diese Fünf-Arbeitsschritte-Folge auch 
zur Entwicklung komplexer Programm-Pakete geeignet ist. Für 
die in diesem Buch angeführten k u r z e n Demonstrationspro- 
gramme genügt eine vereinfachte Arbeitsschrittfolge: 


1. Problemstellung 

2. Problemanalyse 

3. Darstellungen des Algorithmus 
4. Codierung in BASIC 

5. Anwendung/Ausführung 

6. Dokumentation 


Am Beispiel des wiederum linearen Programmes KALKULATION] wol- 
len wir die Arbeitsschritte 1, 2, 4 und 5 darstellen. 


Problemstellung zu Programm KALKULATIONI: 

Es ist ein Dialogprogramm zu erstellen, das ausgehend vom Ein- 
standspreis den Nettoverkaufspreis und den Zuschlagsatz kalku- 
liert. 


Problemanalyse zu Programm KALKULATION] mit Variablenliste und 
Schrittplan: 

In einer Variablen 1l ist e lassen sich die im Pro- 
gramm verwendeten Variablen so zusammenfassen: 


Ausgabedaten (Resultate): 
NET Nettoverkaufspreis in DM 
KALK Kalkulationszuschlag in % 
Eingabedaten (von Tastatur): 
EINST Einstandspreis in DM 


P1 Gemeinkostenzuschlag in % (von Hundert) 
P2 Gewinnzuschlag in % (von Hundert) 

P3 Skontosatz in % (im Hundert) 

P4: Rabattsatz in % (im Hundert) 


Verarbeitung (Formeln): 
GEMEIN Gemeinkosten in DM (GEMEIN=EINST*P1/100) 
SELBST Selbstkosten in DM (SELBST=EINST+GEMEIN) 
SPANNE Gewinnspanne in DM (SPANNE=SELBST*P2/100) 
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BAR Barverkaufspreis in DM (BAR=SELBST+SPANNE) 

SKO Skontobetrag in DM (SKO=BAR*P3/(100-P3) 

ZIEL Zielverkaufspreis in DM (ZIEL=BAR+SKO) 

RAB Rabattbetrag in DM (RAB=ZIEL*P4/(100-P4)) 

NET Nettoverkaufspreis in DM (NET=Z2IEL+RAB) 

KALK Kalkulationszuschlag (KALK=(NET-EINST)*100/EINST) 


folgende Schritt p lan zeigt eine grobe Darstel- 


lung des Lösungsablaufes vom Programm KALKULATIONI: 


Schritt 1: Vier Zuschlagsätze P1-P4 eintippen 
Schritt 2: Einstandspreis EINST eintippen 
Schritt 3: NET und KALK berechnen 

Schritt 4: NET und KALK als Resultat ausgeben 


Codierung zu Programm KALKULATION]: 


REM ======PROGEAMM KALKULATIOHI 
PRINT "WARENKALKULATION: ALS DEM EINSTANDS-" 


128 FRINT "FREIS DEN NETTOWERKAUFSFREIS ERMITTELN. ": PRINT 
134 : 

14@ REM ======VEREINBARUNGSTEIL 

iSsa REM FL,FZ,F3,P4,F5: REAL SZUSCHLAGSRETZE IH 5} 

169 REM EINST, GEMEIN, SELEST, GEWINN, BAR, 5KO, ZIEL, 

Ira REM RAB, NET: REAL WEINZELBETRREGE IN DM: 

154 REM KALK: REAL CKALKULATIONSZUSCHLAG IN #2 
22 : 

zaa REM ======ANWEISUNGSTEIL 

210 REM ### EINGABETEIL “WON TASTATUR? EEREEEEFEEENE 


1 


me incl) CHEN Bots fea 
I 


a EEE EEE RE RR 


IHFUT "GEMEINKOSTEN IH % W.H. ",Pl 
Aa INFLUT "GEWINNZUSCHLAG IM & WEH."SFE 
INFUT "SKONTO IN A I.H. ";F3 
INFUT "RABATT IN 5% I.H,. ".P4 
INPUT "EINSTANDSFREIS IHN IM "EINST 
REM ### VERAFBEITUNGSTEIL CWERTTUWETSUNGEN RE 


LET GEMEIN = EINST# Fi 7 Iac 

LET SELEST = EIHST + GEMEIN 

LET SPAHNE = SELBST # PZ ,/ 1ac 

LET EHk = SELEST + 5SFRHNE 

LET SkKÜ = ERR #& F3  Wlaa-FP23 

LET ZIEL = FEAR + 580 

LET RAE = ZIEL & F4  (1l9E-Pe4h 

LET HET = ZIEL + FRE 

LET ERLE = «NET - EINST: # 100. EINST 

FEM ### AUSGABETEIL SALF EILDSCHIEND EEREREEEEE 
FRINT : FEIHT "WORWAERTSERLEUCATION TURÖHSERÜEHRT:" 
FEIHT "NETTÜWERKAUFSFREIS IN DM: "NET 

FRINT "ERLEULATIOHSZUSCHLAG IH SS ERLK 

END 


Ihre Aufgabe: Erweitern Sie das Programm KALKULATION! so, daß 
nicht nur das Ergebnis, sondern auch alle Zwischenschritte als 
Übersichtsichtstabelle ausgegeben werden (PRINTs einfügen). 
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Anwendung bzw. Ausführung zu Programm KALKULATIONI: 


WAREHERALKULRATION: AUS DEM EINSTANIS- 
FREIS DEN NETTOWERKAUFSFREIS ERMITTELN. 


GEMEINKOSTEN IH X W.H. 23 
GEHINHZUSCHLAG IN % W.H. 14 


SKOHTO IH © I.H, £ 
RABATT IH & I.H. Pt) 
EINHSTANDSPREIS IM DM io 


“OREWAERTSERLEULRTION DURCHGEFLUEHRT: 
NETTOWERERUFSFREIS IN IM: 1909,.77551 
XALKLLRTIONSZUSCHLAG IM m: 90, 7752103 


3.1.2 Programme mit Verzweigungen 


Programmabläufe, die nach vorwärts verzweigen, werden als Aus- 
wahlstrukturen bezeichnet. Je nach der Anzahl der ausgewählten 
Fälle spricht man von der zweiseitigen, einseitigen oder mehr- 
seitigen Auswahl(-struktur). Diese in Abschnitt 1.3.3.2 allge- 
mein beschriebenen Abläufe wollen jetzt in BASIC beispielhaft 
an kleinen Programmen darstellen. 


3.1.2.1 Zweiseitige Auswahl mit IF-THEN-ELSE 


Das Programm SKONTOZWEISEITI hat folgende Aufgabe: 


"Erwarte den Rechnungsbetrag R und die Tage T als Tastatur- 
eingabe und ermittle den Skontobetrag S. Dabei gelten diese 
zahlungsbedingungen: Bei Zahlung nach 8 Tagen (T>8) 1.5 Pro- 
zent Skonto, sonst (T<=8) jedoch 4 Prozent Skonto". 


Die Codierung, die Ausführung und der Programmablaufplan (PAP) 
zu Programm SKONTOZWEISEITI zeigen uns eine zweiseitige Aus- 
wahl(-struktur) auf; diese kann in der "Wenn-dann-Form" oder 
in der "Entweder-oder-Form" formuliert werden. In BASIC steht 
uns die Anweisung IF-THEN-ELSE zur Verfügung. 


{ag REM ======FROGRAMM SKONTOZWEISEITI 
118 PRINT "SKONTO ALS ZWEISEITISE AUSMAHLSTRUKTUR. " 
124 IHFUT "RECHNUNGSBETRAG IN IM";R 
124 INPUT "TAGE NACH ERHALT ";T 
148 IF T > 5 THEN LET F=1.5: 
ELSE LET P=4 


150 LET S=SR#P1a0 : LET R=R-5 
150 FEINT 5: "DM SEONTO UND"SRS "DM ZAHLUNG. " 
178 FEINT "ENDE." : END 
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"Wenn T>8, dann nur 1.5 % Skonto, sonst aber 4 % Skonto" 


"Einerseits 
1.5% (Bedingung T>8 erfüllt, JA-Zweig mit THEN) 
und andererseits 
4% (Bedingung T>8 nicht erfüllt, NEIN-Zweig mit ELSE)" 


140 IF T>8 THEN LET P=1.5: ELSE LET P=4 


Anweisungswort 
Bedingung 
JA-Zweig 
NEIN-Zweig 


Zweiseitige Auswahlstruktur mit der Anweisung IF-THEN-ELSE 


Bei der IF-THEN-ELSE-Anweisung muß vor dem Anweisungswort ELSE 
immer ein Doppelpunkt ":" stehen. Der Übersichtlichkeit 
halber rückt man den ELSE-Teil in der Codierung häufig ein. 
Auf die Programmausführungy hat dies keinen Einfluß. So sind 
die folgenden beiden Codierungen identisch: 


140 IF T>8 THEN LET P=1.5: ELSE LET P=4 


140 IF T>8 THEN LET P=1.5: 
ELSE LET P=4 


Betrachten wir einige Beispiele zur IF-THEN-ELSE-Anweisung: 


500 IF A<>2 THEN PRINT "UNGLEICH": ELSE PRINT "GLEICH" 

600 IF B1<999 THEN PRINT "UNGUELTIG": ELSE LET C=4 

700 IF E>Ei THEN GOTO 750: ELSE GOTO 790 

800 IF X=9 THEN GOTO 860: ELSE IF X=15 THEN GOTO 900: 
ELSE GOTO 950 


Zwei Ausführungen zu SKONTOZWEISEITI: PAP zu SKONTOZWEISEITI: 


SHAHLSTEUETUR, 


SEINTO ALS ZMEISEITIGE AUS 
200 


RECHNUNGSBETRAG IM DMT 
TAGE HACH ERHALT? 

> DM SEONTO UND 192 Tim SAHLUNG, 
ENDE, 


a - i Zı 


SEONTO ALS & ZMEISEITI GE HUSMAHLSTELIETUR., 

FECHHUNGSEBETERG IH DM? ee 

TAGE NACH ERHALT? 
: DM SEOHSTO UND 127 IM SAHLUNG, 

ENDIE. 





FRA 
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Hinter THEN kann also jedes beliebige Anweisungswort stehen. 
Das bedeutet, daß auch m e hr er e Bedingungen hinter THEN 
geschacht e | t werden können. Dann liegt eine mehr- 
seitige Auswahl vor, auf die wir in Abschnitt 3.1.2.3 (anhand 
von Programm DREIFAELLE2) näher eingehen werden. 


Unser nächstes Programm namens SKONTOZWEISEIT2 zeigt, daß die 
zweiseitige Auswahl auch ohne Verwendung von IF-THEN-ELSE mit 
den Anweisungen IF (bedingte Verzweigung) und GOTO (unbedingte 
Verzweigung) programmiert werden kann. Dies hat den Nachteil, 
im Programm mehrmals verzweigen zu müssen. 


Codierung zu Programm SKONTOZWEISEIT2: 


180 REM ======FROGRAMM SKONTOZWEISEITZ 

118 PRINT "5KONTO ALS ZWEISEITIGE AUSWAHLSTELKTUR. " 
128 INPUT "RECHNUNGSBETRAG IN DMF"IR 

130 INPLT "TAGE HACH ERHALT? ";T 

144 IFT >59 THEN 130 

1IS@O LETF= 4 

160 LET S=K#P102 : LET R=R-5 

172g PRINT 5; "DM SKONTO UND"SRS "DM ZAHLUNG." 
138 PRINT "EHDE." : END 

1324 LETF= 1,5 

zaa  GOTO 168 


zur bedingten Verzwei gung verwenden wir 
in Programm SKONTOZWEISEIT2 die IF-Anweisung in ihrer einfach- 
sten Form: | 


140 IF T>38 THEN 190 
Verzweigungsbedingung 
Sprungadresse 


Wenn (IF) T größer als 8 ist (T>8), dann verzweige nach 
Zeile 190 . Wenn nicht, also wenn T kleiner oder gleich 8 
ist (T<=8), dann fahre wie normal mit der Folgezeile 150 fort. 
Anstelle von THEN kann man auch THEN GOTO oder GOTO schreiben. 


zur unbedingten Verzweigung dient die 
diese GOTO-Anweisung 
200 GOTO 160 


Kommt die Ausführung zu Zeile 200, so wird bedingungslos nach 
Zeile 160 verzweigt. 
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Hier eine weitere Codierung zu Programm SKONTOZWEISEIT2, die 
genauso abläuft wie die obige Codierungsform: 


140 IF T>8 THEN 152 


150 LET P=4 (Anweisungen 151 und 152 neu, 
151 GOTO 160 Anweisungen 190 und 200 löschen, 
152 LET P=1.5 sonst unverändert wie Programm 
160 LET S=... SKONTOZWEISEIT2). 


Die END-Anweisung steht zwar als letzte Anweisung im Programm, 
aber das Zwischenspringen mit GOTO ist nicht gerade übersicht- 
lich. 

Programme müssen einfach, übersichtlich und gut lesbar aufge- 
baut sein. Aus diesem Grunde sollten "wilde Sprünge mit GOTOs" 
vermieden und IF-THEN-ELSE-Konstruktionen verwendet werden. 


3.1.2.2 Einseitige Auswahl als Sonderfall 


Die einseitige Auswahl 
"Wenn .., dann tue dies, sonst aber tue nichts" 
kann als Sonderfall der zweiseitigen Auswahl 
"Wenn .., dann tue dies, sonst aber tue das" 


aufgefaßt werden. Das Programm SKONTOEINSEITI zeigt dies an- 
hand von Codierung, Ausführungen, PAP und Struktogramm. In den 
Ausführungen stimmen die Programme SKONTOEINSEITI und SKONTO- 
ZWEISEITI (von Abschnitt 3.1.2.1) überein, die Codierung dage- 
gen zeigt eine einseitige Auswahlstruktur „. Dies wurde durch 
folgenden Trick erreicht: P wird in 140 auf 4% gesetzt und nur 
im Falle von T>8 um 2.5 auf 1.5% vermindert (190 LET P=P-2.5). 


PAP zu SKONTOEINSEITI: Struktogramm zu SKONTOEINSEITI: 





S = R*P/100 sowie R 
Ausgabe von S und R 





3.1 Grundlegende Programmstrukturen 129 


Codierung zu SKONTOEINSEITI: 


109 REM ======PROGRAMM SKONTDEINSEITI 

1198 PRINT "SKONTO ALS EINSEITIGE AUSWAHLSTRUKTUR. " 
128 INPUT "RECHNUNGSBETRAG IN DM"IR 

1360 INFUT "TAGE NACH ERHALT ";T 

144 LET P=4 

150 IF T>S THEN 198 

169 LET S=R#P/18M : LET R=R-5 

17a FRINT 5; "DM SKONTO UND"SR; "DM ZAHLUNG. " 
154 PRINT "ENDE." : END 

199 LET P=P-2.5 

200  GOTO 160 


Ausführungen zu SKONTOEINSEITI: 


SKONTO ALS EINSEITIGE AUSWAHLSTRUKTUR. 
RECHNUNGSBETRAG IN IM? Za0 

TAGE NACH ERHALT” 3 

5 DM SKONTO LIND 192 IM "ZAHLUNG. 

ENDE. 


SKONTO ALS EINSEITIGE AUSWUAHLSTRUKTLUER, 
RECHNUNGSBETRAG IN IM? Zem 


TAGE NACH ERHALT? 14 
3 DM SKONTO UND 197 IM ZAHLUNG. 
ENDE. 


Betrachten wir nun das Programm SKONTOEINSEIT2: 

Die Programme SKONTOEINSEIT2 und SKONTOEINSEIT1I weichen nur 
in den Codierungen ab. Für die Verzweigungsanweisung IF-THEN 
wird in SKONTOEINSEIT2 die Anweisung IF..THEN LET.. verwen- 
det. LET wird aber nur dann ausgeführt, wenn die Verzweigungs- 
bedingung erfüllt ist. IF-Anweisungen wie IF..THEN PRINT.. und 
IF..THEN INPUT.. sind entsprechend möglich. Soll in Abhängig- 
keit der Verzweigungsbedingung aber eineAnweisungsfolge durch- 
ıaufen werden, so ist die einfache Form IF..THEN.. immer vor- 
zuziehen, da sie eine besser lesbare Codierung gewährleistet. 
Anmerkung: Für IF..THEN.. kann auch IF..THEN GOTO.. stehen. 


Codierung zu Programm SKONTOEINSEIT2: 


a PEINT "SKONTO Aus EINSEITIGE USMAHLE STRUKTUR. '" 
a INPUT "RECHNUNGSEETREAG IM DM"SR 

1324 INFUT "TAGE HACH ERHALT ".T 

144 LET P=4 

154 IF T>5 THEN LET F=f-2.5 

168 LET 3=F#F-1lRE : LET Rek-5 

ira PRINT 5; "IM SKOHTO UND"SRS "DM ZAHLUNG. " 

18a FRINT "ENDE.": END 
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3.1.2.3 Mehrseitige Auswahl als Sonderfall 


Bei der mehrseitigen Auswahl werden mehrere Fälle unterschie- 
den: im Programm DREIFAELLEI sind es die drei Fälle 'gleich', 
'vor' und 'nach'. Der PAP und das Struktogramm zeigen uns, daß 
die mehrseitige Auswahl eine Schacht e 1 ung von zwei 
zweiseitigen Auswahlstrukturen darstellt. 

Wie die einseitige Auswahl kann also auch die mehrseitige Aus- 
wahl als Sonderfall der zweiseitigen Auswahl aufgefaßt werden. 


Struktogramm zu DREIFAELLEI: PAP zu DREIFAELLEI: 


Eingabe von W1$ und W2$ 





EEK 


1a REM ======FROGERMM DEEIFRELLEI 

112 FREIMT "MEHRSEITIGE AUSWAHLSTEUKTUR: DREI FAELLE." 

120 INPUT "ZWEI WOERTER", WIE,WEF 

132 IF Wi$=WUE+ THEN FREINT U1$#;" IST GLEICH ":W2$ : GOTO 160 
140 IF WIS<CUZ$ THEH FRINT W1$;" KOMMT YOR ";W2F$ : GOTO 168 
150 FRINT WIE." KOMMT NACH "WE 

162 FRINT "ENDE." : EHI 


Zwei Ausführungen zu Programm DREIFAELLEI: 


MEHRSEITIGE AUSMAHLSTRUKTUR: DEEI FRELLE. 
ZWEI WOERTER?IER. HUNDERT 

12% KOMMT “OR HUNDERT 

EHDE. 


MEHRSEITIGE AUSWAHLSTEUKTUR: DEEI FRELLE. 
ZWEI HOERTER?TFREIS. DM-BETERG 

FREIS KOMMT HACH INM-BETRAG 

EHLDE. 


Numerischer Vergleich und Textvergleich: 

In den IF-Anweisungen dieses Programms findet kein numerischer 
Vergleich statt, sondern ein Textvergleich : Die 
Verzweigungsbedingung W1$=W2$ (ist der Wert von Variable W1$ 
gleich dem von Variable W2$) vergleicht die derzeitigen Werte 
zweier Textvrriablen. Textvariablen enden immer mit einem Dol- 
larzeichen "$", wie z.B.: 


A$, B$, C$, ..., Al$, A2$, ... (Textvariablen mit $) 
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Wie stellt man fest, ob mit dem Textvergleich WiI$<W2$ in Zei- 
le 140 nun der Text "PREIS" kleiner ist (im Sinne von alphabe- 
tisch weiter vorne stehend) als der Text "DM-BETRAG"? Wie Zif- 
fern werden auch Buchstaben und Sonderzeichen intern im ASCII 
dargestellt (Abschnitt 1.2.3.1). Sie erhalten so je eine Code- 
nummer als Ordnungsnummer. Mit den ASCII-Codenummern 80 für P 
und 68 für D wird Wi1$<W2$ bzw. "PREIS"<'"DM-BETRAG" bzw. 80<68 
vom Computer als 'unwahr' erkannt; der Textvergleich führt so- 
mit nicht zur Programmverzweigung. 


Text ist all' das, 'was zwischen Gänsefüßchen steht' . Andere 
Bezeichnungen sind S t rin g ,„ Zeichenkette, Zeichendaten. 
Beim Commodore kann ein String maximal 255 Zeichen lang sein. 
Beim Textvergleich kann wie beim numerischen Vergleich mit den 
Vergleichs-Operatoren =, <> (ungleich), >, <,>= (größer oder 
gleich) und<= gearbeitet werden. 


Zeichen ":" zur Trennung von Anweisungen: 

In den Zeilen 130, 140 und 160 von Programm DREIFAELLEI sind 
mehrere Anweisungen in e i ne r Zeile angeführt (":" dient 
als Trennungszeichen). Mit dem ":" sollte sparsam umgegangen 
werden, weil sich lange Programmzeilen schlecht lesen und kor- 
rigieren lassen. 


Mehrseitige Auswahl (-Struktur) mit IF-THEN-ELSE: 

Das folgende Programm DREIFAELLE2 demonstriert, wie zur mehr- 
seitigen Auswahl mehrere Bedingungen innur einer 
IF-THEN-ELSE-Anweisung angegeben werden können. Die Anweisung 


150 IF W1$=W2$ THEN GOTO 170: 
ELSE IF W1$<W2$ THEN GOTO 180: 
ELSE GOTO 190 


sieht dabei hinter THEN ausschließlich nur Verzweigungen vor. 
Codierung und Ausführung zu Programm DREIFAELLE2: 


iaa REM ======PRÜGERMM TEEIFRELLEZ 
i1d FRINT "MEHRSEITIGE AUSWAHLSTRUKTUR: DREI FRELLE" 

120 FRINT "CVERSION MIT IF-THEN-ELSE>." 

130 INFUT "ZWEI WOERTER"; WiE.UE$ 

142: 

15a IF Wi$=Wl2$ THEN GOTO 178: ELSE IF WI$<W2$ THEN GOTO 15 ©: 
154 : SE GOT 

iro FEINT W18," IST GLEICH ";WU2$: GOTO ELSE DOTO 198 
154 FEINT W133," KOMMT MACH ";UzF: GOTO : 
1>4 FREINT W185" KOMMT YOR "SWE$ 
zad FEINT "ENDE." : END 


R.) 


Ar 
Ak 


fol 
A 


MEHRSEITIGE AUSKWAHLSTRUKTUR: DEEI FRELLE. 
ZUEI WOERTER?CIGS. Cils 
2168 KOMMT NACH Clle 
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3.1.2.4 Fallabfrage mit ON-GOTO 


Die Schachtelung von mehr als zwei Auswahlstrukturen wird all- 
zuleicht unübersichtlich. Zur Vereinfachung der mehrseitigen 
Auswahl bietet BASIC deshalb die Fallabfrayge nit 
der Anweisung ON..GOTO an. Das Programm MWST1I zeigt, daß über 
die ei ne Anweisung 


240 ON WAHL GOTO 250,260,270 (Fallabfrage) 


d re i Verzweigungen ausgeführt werden: Für WAHL=1 wird nach 
Zeile 250 verzweigt, für WAHL=2 nach Zeile 260 und für WAHL=3 
nach Zeile 270. 

Da die Anweisung ON..GOTO in WAHL ganzzahlige Werte erwartet, 
müssen entsprechende Eingabefehler zuvor in den Zeilen 220 und 
230 abgewiesen werden. INT(WAHL) liefert den ganzzahligen Teil 
von WAHL (INT(3.45) ergibt 3; INT(2.9) ergibt 2). 


Struktogramm zu MWSTI1: Zwei Ausführungen zu MWST1: 


Eingabe der Auswahl WAHL 





FALLAEFFAGE: NETTO -— ERUTTO —- MUST. 
NETTÜBETRAG TIFPEN? 159% 
ÜHNE MUST 1 

vÖLLE MWST 2 

HALBE MWST 3 

URHL 1 - 3 TIFFEN? 2 
BEUTTOBETRAG: 1718 DM. 


FALLREFRAGE: NETTO - BEUTTO -— MUST. 
NETTOBETRAG TIFFEN? 1500 
ÖHNE MWST 1 
“ÖLLE MWST = 


HALBE MWST 3 
WAHL 1 - 3 TIFFEN? 3 


Codierung zu Programm MwsTı: BRUTTÜBETRAG: 1665 DM, 





Be 













10m REM ======PROGREAMM MWSTI 

11 PRIHT "FALLREFRRAGE : NETTO — BELTTO — MUST." 
128 REM ======VEREINBARUNGSTEIL 

132 REM NET, MWST, BRUT:REAL 

144 REM WAHL: INTEGER 

150 : 

168 REM ======AHNWEISUNGSTEIL 


178 INFUT "NETTOBETRAG TIFPEN";NET 

138 PRIHT "ÖHNE MWST 1" 

132 PRINT "WOLLE MUST =" 

zug PRINT "HALEBE MWST 3" 

zia INFUT "WAHL 1 - 53 TIPPEN” WAHL 

228 IF WAHL“ j DR UAHL>S THEN FRINT "INTERWALL." : GOTO_ 180 
25a IF WAHL <> IHTG WAHL» THEN FRINT "GANZZAHLIG." : GOTD 180 
248 ON WAHL GOTO 258. 260,270 

256 LET MUST=1 : GOTO 2808 

z60 LET MWST = 1.14 : GOTO 250 

er LET MUST =1.97 

25M LET ERUT = NET # MWST 

236 LET BRUT = INT{IBRUT * 106 + 8.527100 

388 PRINT "BRUTTOBETRAG: ";BRUT; "IM." 

310 END 
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3.1.3 Programme mit Schleifen 


Programme mit Schleifen enthalten Abläufe, die sich mehrmals 
wiederholen. Man spricht deshalb von Wiederholungsstrukturen. 
In Abschnitt 1.3.3.3 wurden diese Strukturen allgemein darge- 
stellt. Im folgenden werden wir sie in Commodore-BASIC an Bei- 
spielen veranschaulichen. 


3.1.3.1 Abweisende Schleife mit DO-WHILE-LOOP 


Programm KAPITAL10 ermittelt für ein Kapital K bei einem Zins- 
satz P das verzinste Kapital zum Ende des 1., 2., 3. .. Jahres 
und endet, sobald sich das Anfangskapital verdoppelt hat. Die 
Schleife finden wir in den Programmzeilen 220 bis 250; 


220 DO WHILE K<KE Wiederhole, solange K<KE ist 

230 LET K=K+K*P/100 Kapital K um Zinsen K*P/100 er- 
240 PRINT " "+K höhen und dann ausgeben 

250 LOOP Überprüfe auf Schleifenende 


Die Anweisungen DO-WHILE-LOOP dienen der Schleifensteuerung; 
sie sorgen dafür, daß die Zeilen 220,230,240,250,220,230,240, 
250,220,.....,250,220,260 nur durchlaufen werden, solange das 
Kapital K kleiner als das Endkapital KE ist. 


Wie jede Wiederholungsstruktur besteht auch diese Schleife aus 
einem Vorbereitungst ei |] (einmal durchlaufen; 
Zeilen 180-200) und einem Wiederholungsteil 
(mehrmals durchlaufen: Zeilen 220-250); im ersten Ausführungs- 
beispiel wird dieser 9mal durchlaufen und im zweiten 5mal. 


Die Schleife in Programm KAPITALIO ist abweisend, da 
die Schleifenabfrage 220 DO WHILE K<KE am Anfang des Wieder- 
holungsteils steht und damit eine versuchte Wiederholung ggf. 
abweisen kann. Andere Bezeichnungen für diesen Schleifentyp 
sind: Solange-tue-Schleife, Schleife mit vorheriger Abfrage 
und Schleife mit Eintrittsbedingung am Anfang. 


180 Vorbereitungsteil (nur einmal durchlaufen): 
190 ... Anfangswerte setzen 

200 7. 

2r0r 425 Wiederholungsteil (mehrmals durchlaufen): 


ME EEE: aim HE: HMMM; DEN: EN: (ME; (ME: SEEN; GEN: SAG; SE: AEG. GES GE EG CHE EG FA GE HE GG ES HE: CE: A: TE EG: EG CE: GN: GE: GE GETS CE 


220 DO WHILE ... Schleifensteuerung 


230 eu Schleifenkörper 
240 Fr bzw. Block 
250 LOöP Schleifensteuerung 


Abweisende Schleife mit Vorbereitungs- und Wiederholungsteil 
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Das Struktogramm und der PAP zu Programm KAPITAL10 zeigen, wie 
eine abweisende Schleife grafisch dargestellt werden kann. 


Codierung zu Programm KAPITAL10: 


199 REM ======PROGRAMM KAPITAL1H 

118 PRINT "KAPITALIEN BIS ZUR VERDOPPLUNG ERMITTELN. " 
128 REM ======VEREINBARUNGSTEIL 

138 REM K: RERL (KAPITAL IN DM) 

1420 REM KE: REAL (CENDKAPITAL IN DM) 

158 REM P: REAL CZINSSATZ IN DM} 


160 : 

178 REM ======ANWIEISUNGSTEIL 

1358 INPUT "EINGESETZTES KAPITAL" ;K 
136 INFUT "JAHRESZINSSATZ ",P 


200 LETKE=ZH#K 

210 REM *##BEGINN DER ABWEISENDEN SCHLEIFE MIT WHILERKERRERRE 
228 DO WHILE KIKE 

238 LET K=K+K#P/1008 

240 PRINT " "IK 

258 LOOP 

260 REM %%#5CHLE TFENENDERRHRRRÄSKAER ARE RERRRANRRERÄBISRARRRORAERRICK 
2ra PRINT "ENDE NACH VERDOPPLUNG." : END 


Struktogramm zu KAPITALI10: PAP zu KAPITALI10: 














Schleife vorbereiten: 
K, P und KE festlegen 


Solange K<KE ist, wiederhole 


yerzinstes Kapital K aus: 
K+ .(K* P / 100) 


Wert von K ausgeben 
Programmende mitteilen 


Ausführungen zu Programm KAPITAL10: 








KAFITALIEN BIS ZUR VERDÖPPLUNG KAFITALIEN BIS ZUR VERDÖFPFLUHNG 
EINGESETZTES KAPITAL? aaa EINGESETZTES KAFITAL? 300 


JAHRESZINSSATZ? 3 JAHRESZINSSATEZ? 15 
34308 345 
„34095 KE-Ferg 
64731.45 436. 2625 
"2573.0505 24.791373 
"5931.1975 60.3.4716 
83859. 4456 ENDE NACH YERDOPFLUNG. 
21491.9561 
SI625.,1321 
123594.664 


ENDE NACH VERDÜÖPPLUNG. 
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Das folgende Programm KAPITAL11 läuft genauso ab wie das Pro- 
gramm KAPITAL10. Die Codierungen hingegen unterscheiden sich, 
da die Schleifensteuerung nicht mit DO-WHILE-LOOP, sondern mit 
IF-GOTO vorgenommen wird. 


Codierung zu Programm KAPITAL11: 


104 REM ======FRÜGEAMM KAPITAL11 
11@ FRINT "KAPITALIEN BIS ZUR VERDOFFLUNG ERMITTELN." 
120 REM ======VEREINBARUNGSTEIL 


1308 REM K: REAL “KAPITAL IN IM} 
148 REM KE: RERL (ENDKAPITAL IN DM} 
158 REM F: REAL <ZINSSATZ IN DM) 


168 : 

175 REM ======ANWEISUNGSTEIL 

184 INFUT "EINGESETZTES KAFITAL";K 
136 INPUT "JAHRESZINSSATZ ";P 


z08 LETKE=ZHK 

21a REM ###BEGINN DER ABWEISENDEN SCHLEIFE MIT IF RER 
228 IFK >= KE THEN 27 

230 LET Kak+k#P,106 

248  FRINT " ";E 

258  GITO 2Z20 

268 REM SEKSCHLE TFENENDEFRFFERFHFEEERTREIEREETIEEIEEEREEKEENE 
278 PRINT "ENDE NACH VWERDOFFLUNG." : END 


3.1.3.2 Nicht-abweisende Schleife mit DO-LOOP UNTIL 


Programm KAPITAL2O verwendet die Anweisungen DO-LOOP-UNTIL zur 
Steuerung einer nicht - abweisenden Schlei- 
fe. Dabei steht die Schleifenabfrage LOOP UNTIL K>=KE am Ende 
des Wiederholungsteils in der Zeile 250. 

Die nicht-abweisende Schleife wird häufig als Wiederhole-bis- 
Schleife, Schleife mit nachheriger Abfrage oder mit Austritts- 
bedingung am Ende bezeichnet. 


In den Ausführungen stimmen alle KAPITAL10 und KAPITAL2O über- 
ein. Zu beachten ist, daß sich die Abfrage DO WHILE K<KE von 
KAPITAL10 zu LOOP UNTIL K>=KE in KAPITAL2O umkehrt (">=" an- 
stelle von "<"). 

PAP zu KAPITAL2O: 
Struktogramm zu KAPITAL20O: 


Anfangswerte K, P und KE 
K = K+(K*P / 100) 


wiederhole bis K>=KE ist 


Programmende 
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Codierung zu Programm KAPITAL20: 


198 REM ======PROGRAMM KAPITALZA 
118 PRINT "KAPITALIEN BIS ZUR VERDOPPLUNG ERMITTELN." 
120 REM ======VEREINBARUNGSTEIL 


138 REM K: REAL “KAPITAL IN DM} 
148 REM KE: REAL SENDKAPITAL IN DM) 
150 REM P: REAL CZINSSATZ IN IM) 


168 : 

17@ REM ======ANWEISUNGSTEIL 

1808 INPUT "EINGESETZTES KAPITAL";K 
198 INPUT "JAHRESZINSSATZ "‚P 


208 LETKE=Z#K 

218 REM #%kBEGINN DER NICHT-ABWEISENDEN SCHLEIFERKK 
220 DO 

2398 LET K=K+K#P/109 

24a PRINT" ";K 

258 LOOP UNTIL K>=KE 

260 REM K%KSCHLE IFENENDEKAERRRSRRRRERSRAISE ANKARA 
278 PRINT "ENDE NACH VERDOFPLUNG." : END 


Wie Programm KAPITAL20 weist auch das Programm KAPITAL21 eine 
nicht-abweisende Schleife auf. Zur Steuerung dieser Schleife 
wird jedoch eine IF-THEN-Anweisung anstelle der DO-LOOP-UNTIL- 
Anweisung verwendet. In den Ausführungen stimmen beide Pro- 
gramme überein. 


Codierung und Ausführung zu Programm KAPITAL21: 


109 REM ======PROGERAMM KAFITALZ1 
ila PRINT "KAFITALIEN BIS ZUR VERDÖFFLUNG ERMITTELN." 
129 REM ======V/EREINBARUNGSTEIL 


132 REM K: FERL CKAFITAL IN DM) 
142 REM KE: RERL <ENDERPFITAL IN DM: 
150 REM P: REAL (ZINSSATZ IN Di 


184 : 

170 REM ======ANMEISUNGSTEIL 

13a INFUT "EINGESETZTES KAPITAL";SK 
198 INPUT "JAHRESZINSSATZ "‚P 


zd4 LETKE=SZ#K 

219 FEEM #%&#BEGINH DER HICHT-AEWMEISEHDEN SCHLEIFE MIT IF#R% 
z208 LET K=K+k#P-100 

esa  FEINT " ';K 

24a IF KSKE THEN 220 

zsa REM ###5CHLE TFENENDEFFFFEREEEFEREFEEEEE FERIENSERIE 
26 FRINT "ENDE NACH VERDOFFLUNG." : ENI 


KAFITALIEN BIS ZUR YERDÖFPLUNG ERMITTELH. 
EINGESETZTES KAPITAL? 1a9cac 
JAHRESZINSSATZ? Eee 

122906 

145344 

151354.3 

221533.496 


ENDE NACH VERDOFFLUNG. 
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3.1.3.3 Schleife mit Abfrage in der Mitte mit DO-LOOP-EXIT 


Oft befindet sich die Schleifenabfrage nicht am Beginn (abwei- 
sende Schleife) oder Ende (nicht-abweisende Schleife), sondern 
irgendwo inmitten des Wiederholungsteils. Dieser Schleifentyp 
kann in Commodore-BASIC mit den Anweisungen DO-LOOP-EXIT pro- 
grammiert werden. Das Programm DEMO-EXIT demonstriert diesen 
Schleifentyp: die Anweisung 150 IF ZAHL=5 THEN EXIT bewirkt, 
daß die Schleife verlassen wird (EXIT), wenn ZAHL=5 ist. EXIT 
verzweigt zu der auf LOOP folgenden Anweisungszeile, d.h. zur 
zeile 180. 


Codierung zu Programm DEMO-EXIT: 


109 REM ======PROGRAMM DEMO-EAIT 

ild@ PRINT "DEMONSTRATION ZUR SCHLEIFE MIT DO-LOOP-ERXIT." 
128 : 

130 DO 

148 LET ZAHL=INTEIGKRNDEI>+I) 

15a IF ZAHL=S THEN EAIT 

168 PRINT ZAHL; 

ira LOOP 


Ausführungen zu Programm DEMO-EXIT: 


DEMONSTRATION ZUR SCHLEIFE MIT DO-LOGP-EXIT. 
10 4 2 4 


DEMONSTRATION ZUR SCHLEIFE MIT DO-LOOP-ERIT. 
ı ı12 29585 7 7 


DEMONSTRATION ZUR SCHLEIFE MIT DO-LÜOP-ERAIT. 


24 1 

130 DO Schleifensteuerung 

140 „.. 

150 IF ... THEN EXIT Schleifenausgang hinter LOOP 
THOM 

170 LOOP Schleifensteuerung 


'Schleife mit Abfrage in der Mitte' mittels DO-LOOP-EXIT 


Auch das Spielprogramm ZUFALL1 weist den Schleifentyp "Abfrage 
in der Mitte des Wiederholungsteils' auf: Die Schleifenabfrage 
290 IF 2=D THEN EXIT befindet sich i nmi t ten des Wieder- 
holungsteils (Zeile 260 bis Zeile 310). Aus dem Struktogramm 
sehen wir deutlich, daß innerhalb der Schleife noch eine 'zwei- 
seitige Auswahlstruktur eingeschachtelt ist: Wenn 2Z>D, dann zu 
groß, sonst zu klein. Unser Programm ZUFALLI ist also bereits 
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recht komplex mit drei Programmstrukturen: 


Ablaufstruktur: Steuerung in BASIC: 
Folge (200-250) Anweisungsfolge 
Schleife (260-310) DO-LOOP-EXIT 
Zweiseitige Auswahl (300) IF-THEN-ELSE 


zu den zwei Funktionen RND() und INT in Zeile 230: 
RND() (von RaNDom=Zufall) erzeugt eine Zufallszahl zwischen O0 
und 1. Dabei kommt es auf den in Klammern gesetzten Wert an: 


- RND(negative Zahl) erzeugt eine Startzahl für eine Zufalls- 
folge. 

- RND(-TI) setzt die Startzahl in Abhängigkeit des internen 
Zeittaktes TI (vgl. Abschnitt 2.3). 

- RND(positive Zahl) liest eine Zahl aus einer mit RND(negati- 
ve Zahl) gewählten Zufallsfolge. Beispiele: RND(1), RND(A). 


Die zusätzliche Anweisung 195 LET D=RND(-TI) würde sicher- 
stellen, daß bei jedem Programmlauf von ZUFALLI eine "andere' 
Zufallszahl gewählt wird. 


Die Funktion INT (von INTeger=ganzzahlig) schneidet eventuell 
vorhandene Kommastellen ab. Die hier im Ausführungsbeispiel zu 
Programm ZUFALLI vom Computer erzeugte Zahl 108 kann in Zeile 


230 LET D = INT(A*RND(A)+N) 
zum Beispiel wie folgt nach D zugewiesen worden sein: 
- RND(A) ergibt 0.88249 
- A bzw. 10 mal 0.88249 ergibt 8.8249 


- N bzw. 100 plus 8.8249 ergibt 108.8249 
- INT(108.8249) ergibt schließlich die zu erratende Zahl 108 


Struktogramm zu ZUFALL]: Ausführung zu ZUFALLI: 






Anfangswerte A,N,D und V_ | SaTeH EINER ZAHL ALS SPIELPROGRAMM, 


EINE ZAHL WIRD ZUFRELLIG AUS DEN RA 
AUF N FOLGENDEN ZAHLEN ERZEUGT, 
BITTE A,N EINTIFPEH? 18 . 108 


SFIELBEGINN COMPUTER - BENUTZER: 
IHRE ZAHL BITTE? 1605 

„.. 2 GROSS. 

IHRE ZAHL EITTE? 103 

„.. ZU GROSS. 

IHRE ZAHL EITTE? 181 

TREFFER 181 HACH 3 WERSUCHKEN>. 
ENDE DES SFIELES. 


zahl Z eintippen 






Versuche V = V+J1 







wenn D=Z2 Schleifenende 


Treffer D und Versuche V 


17 
1) 
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Codierung zu Programm ZUFALL1I mit Funktion RND(): 


188 REM ======PROGRAMM ZUFALL1 

112 PRINT "RATEN EINER ZAHL RLS SPIELPROGRAMM. " 
128 : 

138 REM ======VEREINBARUNGSTEIL 

148 REM Z: REAL “JEWEILIGE BENUTZERE INGABE} 


158 REM D: INTEGER <ZUFALLSZAHL DES COMPUTERS>? 
i68 REM Al, N: INTEGER (GRENZEN FUER ZUFALLSAUSWAHL > 
179 REM W: INTEGER (VERSUCHSZAREHLER: 

138 


190 REM M ======ANWEISUNGSTEIL 

2868 FRINT "EINE ZAHL WIRD ZUFRELLIG AUS DEN A" 

210 FRINT "RUF N FOLGENDEN ZAHLEN ERZEUGT." 

228 INPUT "BITTE R,N EINTIPPEN"; A,N 

238 LET D=EINTCA#RNDCR>+ND : LET Y=6 

240 PRINT : PRINT "SPIELBEGINN COMPUTER - BENUTZER: " 

258 REM #KBEGINN DER RATESCHLETFERERKASSRRRRRE 
DO 


era INPUT "IHRE ZAHL BITTE"; Z 
280 LET V=V+l 
2308 IF Z=D THEN EXIT: REM SCHLE IFENABFEAGE 
saa IF Z>D THEN FRINT "... ZU GROSS. 
ELSE FRINT "... ZU KLEIN." 
318 LOOP 


320 REM *##ENDE DER SCHLETFERRRRRRRRRR 
338 PRINT "TREFFER" ;D;" NACH ";W;" VERSUCHEN). " 

349 FRINT "ENDE DES SPIELES." 

358 END 


3.1.3.4 Zählerschleife mit FOR-NEXT 


Läßt man ein Testprogramm auf verschiedenen Computern laufen, 
um über den Vergleich der Ergebnisse deren Leistungen zu beur- 
teilen, spricht man von einem Benchmark - Test. 
Ein einfacher Test besteht darin, 2000 mal 10 durch 3 zu tei- 
len, um über die hierfür benötigte Zeit dann auf die Verarbei- 
tungsgeschwindigkeit des Computers bzw. der CPU zu schließen. 
Das Programm BENCHMARK-TESTI enthält dieses Testverfahren. 
Der Programmlauf auf einem Commodore benötigte ungefähr 15 Se- 
kunden. 


In der Zeile 130 von Programm BENCHMARK-TESTI ist eine Zäh- 
lerschleife 


130 FOR Z=1 TO 2000: LET T=10/3 : NEXT 2 


programmiert, die sich genau 2000 mal wiederholt: die Variable 
2 durchläuft die Werte 1,2,3,...,2000 und heißt deswegen 
auch Laufvariable. Da 2 dabei jeweils um 1 hochge- 
zählt wird, nennt man sie Zählervariable bzw. Zähler. 
zur Kontrolle der Zählerschlei f e stellt Commo- 
dore-BASIC die beiden Anweisungen FOR sowie NEXT zur Verfü- 
gung. 
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Statt in einer Zeile kann man die Zählerschleife von Programm 
BENCHMARK-TEST1I auch wie folgt in drei Zeilen schreiben: 


130 FOR Z=1 TO 2000 -Für Z, das von 1 bis 2000 laufen soll 
131 LET T=10/3 -Bei jedem Durchlauf 10/3 nach T bringen 
132 NEXT 2 -Z um 1 erhöhen und ggf. nach 130 gehen 


Da die Überprüfung der Schleife am Ende in der NEXT-Anweisung 
stattfindet, wird eine Schleife mit FOR X=5 TO 5 ... NEXTX 
genau e in ma 1 durchlaufen. 


Der PAP zu BENCHMARK-TESTI zeigt, welche Sinnbilder für die 
grafische Darstellung der Zählerschleife vorgesehen sind: Zwei 
"abgeschrägte' Rechtecke für den Schleifenanfang (FOR) und für 
das Schleifenende (NEXT). 

PAP zu BENCHMARK-TESTI: 
zu den Eintragungen im PAP: 
- A für "Ausgabe". 
- TEST als Schleifenname. 
- AW: Anfangswert für Laufvariable. 
- EW: Endwert für Laufvariable 2. 
- Z: Laufvariable 
- T=10/3: Wertzuweisung 


Struktogramm zu BENCHMARK-TESTI: T=10/3 


Ausgabe von T 


Für Z von 1 bis 2000 wiederhole 









Zuweisung T = 10/3 


Ausgabe von T 





Hier einige Beispiele für gültige FOR-Anweisungen (Werte der 
Laufvariablen jeweils in Klammern): 


- FOR I=100 TO 102 (100,101,102) 

- FOR Si=3 TO EWER (3,4 bei EWER=4) 

- FOR D=0 TO 6 STEP 2 (0,2,4,6) 

- DOR D=0 TO 7 STEP 2 (0,2,4,6) 

- FOR A=9 TO 13 STEP 3 (9,12) 

- FOR I=8 TO 6 STEP -1 (8,7,6) 

- FOR 29=1 TO 1.5 STEP 0.1 (1,1.1,1.2,1.3,1.4,1.5) 
- FOR A=1 TO I (1) 


- FOR TT=T1I TO 300 STEP 50 (251 für T1=251) 
- FOR X%=AW TO EW STEP SW (30,40,50 bei AW=30, EW=50, SW=10) 


Mit STEP kann man dabei für die Laufvariable eine von 1 abwei- 
chende Schritt wei t e angeben. Ist STEP negativ, so 
muß der Anfangswert natürlich größer sein als der Endwert; ist 
dies nicht der Fall, wird die Zählerschleife überhaupt nicht 
durchlaufen. 
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Codierung zu BENCHMARK-TESTI: 


194 REM ======PRÜOGRAMM BENCHMAFRK-TESTI 

11a FRINT "TEST EUR | „ERRRBEITUNGSGESCHMINDIGKEIT." 
12a FRINT T," -> TES TBEGINN "EITTE WARTEND. 

120 FOR Zei 10 zaag: LET T=10.3 : NERT Z 

144 FRINT T:" -> TESTENDE." 

156 END 


Ausführung zu Programm BENCHMARK-TESTI: 


TEST ZUR VERARBEITUNGSGESCHWINDIGKEIT. 
ad -> TESTEEGINN (BITTE WARTEN). 
3.33333333 > TESTENDE. 


3.1.3.5 Unechte Zählerschleife 


Eine unech t e Zählerschleife liegt vor, wenn mit den 
Anweisungen FOR-NEXT überhaupt nicht gezählt werden soll, d.h. 
wenn diese beiden so bequem verwendbaren Anweisungen 'nur' zum 
Zwecke der Schleifensteuerung programmiert werden. Das folgen- 
de Programm FAHRTENBUCHI zeigt dies anhand einer Kfz-Benzin- 
abrechnung. 

In der Zählerschleife (Zeilen 260 - 360) wird in der Anweisung 


260 FOR 2 = 1 TO 999 (Endwert 999 sehr groß) 


mit 999 ein normalerweise nicht erreichbarer Endwert angegeben 
(Schleife nicht 999 mal durchlaufen). Der eigentliche Schlei- 
fenausgang ist in Zeile 290: Bei Eingabe von Null (K1=0?) wird 
die Laufvariable auf 999 gesetzt (LET 2=999) und nach 360 zur 
NEXT-Anweisung verzweigt. Dann wird nach Zeile 260 gegangen, 
wo die FOR-Anweisung feststellt daß die Laufvariabe 2 den End- 
wert 999 erreicht hat. FOR beendet die Schleife und das Pro- 
gramm fährt mit Zeile 370 fort. Durch die Anweisung 


290 IF K1=0 THEN LET 2=999: GOTO 360 (Schleifenausgang) 


wird der Commodore also "angeschwindelt', die Schleife bereits 
999 mal wiederholt zu haben. 


Schleife mit z w e i Ausgängen: Die Schleife könnte durch ei- 
ne Verzweigung 290 IF K1=0 THEN 370 direkt verlassen werden. 
Diese Möglichkeit widerspricht dem Prinzip der strukturierten 
Programmierung, für jede Programmstruktur je einen Ein- 
gang und Ausgang vorzusehen (vgl. Abschnitt 1.3.7.4). 
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Ausführung und Codierung zu FAHRTENBUCHI 


KF2-BENZIHVERBRAUCHSWERTE ERMITTELN 
AUS EINTERGUNGEN IM FAHRTENBUCH. 


ANFANGSKILOMETERSTAND ZTANK=VOLL>? SAREB 
1 . TANKEN: KM-STAND.LITER,DM CO=ENDE:? 


2,8, 4 
VERBRAUCH IN LITER/188 KM: 18 
BENZINFREIS IN DM/LITER: 1.4 


2 „ TANKEN: KM-STAND,LITER,DM <B=ENDE)? 
isa ,„ 1a, 14 
WERBRAUCH IN LITER/1AG KM: 12.5 
BENZINPREIS IN DM/LITER: 1.45 


3 . TANKEN: KM-STAND,LITER.IM (Co=ENDE?? 
160 , 28 , 29 


KILOMETER GESAMT: 260 DM 

HUSGABEN GESAMT: 43 IM 

VERBRAUCH MITTEL: 11.5394515  LITER-188 KM 
BENZINFREIS MITTEL: 1.43333333  DM/LITER 


100 REM ======PRIGRAMM FAHRTENBUCHI 

119 PRINT "KFZ-BENZINVYERBRAUCHSWERTE ERMITTELN" 

125 PRINT "AUS EINTRAGUNGEN IM FAHRTENEUCH." : PRINT 
130 : 

148 REM ======VEREINBARUNGSTEIL 

150 REM E1: REAL CKM-STAND AUS FAHRTENEUCH: 

168 REM Li: RERL <LITERVERBRAUCH AUS F.} 

ira REM Di: REAL CDM-BETRAG FUER TANKEH AUS F. > 

182 REM Wi: REAL “VERBEAUCH IN LITER/1GR KM) 

196 REM Bl: REAL “BEHZINPREIS IN DM’LITER) 

204 REM E.L,D,W,B: REAL <ENTSFRECHEHDE GESAMTWERTE) 
218 REM Z: INTEGER <LAUFYARIABLEN 


230 REM ======ANWEISUNGSTEIL 

2420 INPUT "ANFRANGSKILOMETERSTAND CTANK=YOLL>" Ka 
258 LET K=E : LET L=# : LET Deo 

edel FÜR Z = 1 TO 393 

era FRINT 25". TANKEN: KM-STAND,LITER,IM CA=ENDEH" 
eo INFUT " "» K1.L1,Di 

En IF K1=8 THEN LET 2Z=333 : G0T0 360 

sag LET Ki=ki-Kü : K=k+kl : L=L+Ll1 : IelerDi 

sig LET Yisiga # Li. Kl 

sed FRINT "WERBFAUCH IN LITER-LOR EM:";WA 

Ss3E LET BisDirli 

s4a  FRIHT "BEHZINFREIS IN DM-LITER: ":Bi 

3Sa LET KE=SkA+kL : FREINT 


3 
3 


36H NEKT Z 

Srea LET Welsa#lLrE : LET Bell : PRINT 

3549 FRINT "KILOMETER GESAMT: ";ks" DM" 

33a FREINT "AUSGABEN GESAMT: ",D," IM" 

ac FRIHT "WERBRALUCH MITTEL: "5%" LITER KM" 
41a an "BENZIHFREIS MITTEL:":BS" DM-SLITER" 

dee EHI 
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Ein Ausgang (Zeile 360): Zwei Ausgänge (290, 360): 


260 FOR Z = 1 TO 999 260 FOR Z = 1 TO 999 






290 IF K1=0 THEN 2=999: GOTO 360 290 IF Kl=0 THEN 370 


- u = - m: m 


360 NEXT 2 * 360 NEXT 2 
SIE una 370 us 





gut: ein Eingang, ein Ausgang schlecht: unklare Struktur 


Unechte Zählerschleife auf zwei Arten programmiert 


Struktogramm zu FAHRTENBUCHI: PAP zu FAHRTENBUCH]I: 


Vorbereitungsteil 


Für Z von 1 bis 999, wiederhole 


oe... Anweisungen .... 


Eingabe von Ki 


ee Ze 
999 als 
Endwert 


Anweisungen 


Ausgabe von K, D, V sowie B 











Setze Z auf 













mit einer Schleife in 260-370: 


Offene und geschlossene Schleife: 

Zu Beginn jeder Ausführung von Programm FAHRTENBUCHI ist voll- 
kommen offen, wie oft die Schleife durchlaufen wird. Man nennt 
diese Schleife deshalb auch eine o f fe ne Schleife. Dem- 
gegenüber wurde BENCHMARK-TEXTI als geschlossene 
Schleife jeweils immer 2000 mal durchlaufen. Der Typenbildung 
von "offenen und geschlossenen Schleifen' liegt also die Fest- 
legung der Schleifendurchläufe als Unterscheidungskriterium 
zugrunde. 
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3.1.3.6 Schachtelung von Zählerschleifen 


Mehrere Programmstrukturen können entweder hintereinander oder 
geschachtelt in e i ne m Programm angeordnet sein (vgl. Ab- 
schnitt 1.3.3.5). Bei der Schachtelung von Zählerschleifen ist 
zu beachten, daß die zuerst begonnene äußere Schleife zuletzt 
beendet wird, daß die innere Schleife somit vollständig einge- 
schachtelt ist. Im Beispiel mit X-Schleife außen und Y-Schlei- 
fe innen wird in 400 das Wort TEST 12 mal (3%4=12) ausgegeben. 


300 FOR X=1 TO 3 300 FOR X=1 TO 3 

310 FOR Y=1 TO 4 310 FOR %Y=1 TO 4 

400 PRINT "TEST" 400 PRINT "TEST" 

u se läuft nicht 
590 NEXT Y 590 NEXT 4% 

600 NEXT X 600 NEXT Y 

vollständige Schachtelung falsch: teilweise Schachtelung 


Schachtelung mit innerer Y-Schleife und äußerer X-Schleife 


Auch im Programm RATENSPARTABELLE sind zwei Zählerschleifen 
geschachtelt angeordnet: Die innere Schleife mit I als Laufva- 
riable für die Jahre (im Ausführungsbeispiel I=1,2,3,4) und 
die äußere Schleife mit J für die Anzahl der Jahreszahlungen 
(im Beispiel J=1,2). Die Beispieltabelle weist damit 8 Druck- 
zeilen auf, da die PRINT-Anweisung in Zeile 340 genau 8 mal 
(4*2=8) durchlaufen wird. 


Struktogramm zu RATENSPARTABELLE: PAP zu RATENSPARTABELLE: 


Anfangswerte S,Z,V,P,K,F 


Überschriftzeile ausgeben 







Guthaben K ermitteln 
und Zeile ausgeben 





3.1 Grundlegende Programmstrukturen 145 


Codierung zu RATENSPARTABELLE (Schleifen in Zeilen 310-360): 


1924 REM ======PROGRAMM RATENSPARTABELLE 
118 PRINT "GUTHABENENTWICKLUNG BEIM RATENSPAREN" 
128 PRINT "ALS UEBERSICHTSTABELLE. " 


130 : 

142 REM ======WEREINBARLNGSTEIL 

152g REM 5: REAL “5SFARRATE GLEICHBLEIBEND? 

165 REM Z: INTEGER “ANZAHL DER ZAHLUNGEN PRO JAHR) 

irB REM INTEGER (VERTRAGSLAUFZEIT DES RATENSPARENS> 


5 
£ 
vw: 
150 REM E REAL JAHRESEINSSATZ3 
j 
I 
„I 


198 REM F: REAL “ZINSFAKTOR AUS ZINSFORMEL> 

zaa REM K: REAL KAPITAL ALS NEUES ENDGUTHABEN> 

218 REM I: INTEGER “LAUFWARIABLE AEUSSERE JAHRESSCHLEIFE} 
ze REM INTEGER “LAUFVARIABLE INNERE MONATSSCHLEIFE? 
238 


nu 


259 INPUT "SPARRATE ZAHLUNGEN/ JAHR "s 5.2 
2520 INPUT "VERTRAGSLAUFZEIT CIJAHRE> ": 
era INFUT "ZINSSATZ KR JAHR) F 

258 LET K=# : LET F=el+P/Zr198 

234 PRINT : PRIMT " TAHR MONAT GUTHABEN" 

>08 EEM ###BEGINH DER SCHLEIFENSCHACHTELUNGEEREREREREER EN NE 
sie FOR I = 1 TOY : REM BEGINN DER SCHLEIFE “ALSSEN” 

sei FOR T=1 TOZ : REM BEGIHN DER SCHLEIFE “INNEN” 


33 LETK=CiK+SI HF 

344 FRINT TABCZ2; 1: TABS 73: TE TABC13> 5 INTCK& 19H. 52,1 
3SE NEST T : REM ENDE DER SCHLEIFE “IHNEN” 

3658 NE#T I : REM ENDE DER SCHLEIFE “ALSSEN“ 


378 FEM #%#ENDE DER SCHACHTELUNGERFEEEFEREFANSRAEHRIE FIRE 
354 FREINT "ENDE." : END 


Zwei Ausführungen zu Programm RATENSPARTABELLE: 


GUTHABENENTWICKELUNG BEIM RATEHSFAREN 
ALS LIEFERSICHTSTABELLE. 

SFARFATE, ZAHLUNGEN "TAHR? Zua 5, 2 
YERTRAGSLAUFZEIT 1 JAHRE>? 4 

ZINSSATZ (ar IAHR>? 
GUTHABEHENTWICKLUHNG BEIM EATENSFAREN 
AL= LEBERSICHTSTABELLE,. 

SFARFERTE, ZAHLUNGEN-IAHR?T ZU0 , 2 
„ERTERGSLAUFZEIT JAHRE? 4 


ZIHSSATZ AS TAHRT? 12 
JAHRE MONAT GUTHABEN 

1 1 zilE 

1 % 42E, 72 
= 1 574.32 
2 2 SuT.d2 
3 i 1175.06 
2 = 1472.77 
4 1 1772.43 
4 & 232,26 
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3.1.3.7 Warteschleife bei Zeitverzögerung und GET 


Die Programmschleife 


100 FOR ZEIT=1 TO 1000 
110 NEXT ZEIT 


wird 1000 mal durchlaufen, was seine Zeit braucht. Deshalb 
sieht man diese Schleife oft als Warteschleife zur Zeitverzö- 
gerung vor. Man kann die Warteschleife auch einzeilig als 


100 FOR ZEIT=1 TO 1000 : NEXT . 


Statt FOR NEXT haben wir verkürzt NEXT geschrieben (diese 
Möglichkeit sollte bei umfangreichen Programmen nicht angewen- 
det werden (schlechte Lesbarkeit). 


Einem ganz anderen Zweck dient die folgende Warteschleife: 


300 PRINT "ERKLAERUNG (JA/NEIN)?" 
310 GET E$ 

320 IF E$="J" THEN 350 

330 IF E$="N" THEN 500 

340 GOTO 310 

350 PRINT "ERKLAERUNG: ...." 


500 PRINT "BEGINN DES EIGENTLICHEN PROGRAMMS: " 


Die GET-Anweisung erwartet e i n Zeichen als Tastatureinga- 
be, ohne daß die /RET/-Taste gedrückt werden muß. Sobald ein 
Zeichen eingetippt wurde, wird es mittels 310 GET E$ nach E$ 
zugewiesen. GET verlangt stets eine Warteschleife (hier: Zeile 
310,320,330,340,310, ...), da immer wieder die Tastatur nach 
einer Eingabe abgefragt wird. Die Warteschleife können wir in 
einer Zeile wie folgt schreiben: 


310 GET E$: IF E$="" THEN 310 
320 IF E$="J" THEN 350 
330 GOTO 500 


Die Ablauflogik ist dabei jedoch weniger streng, da für alle 
Eingaben außer "J" keine Erklärung gegeben wird. Hier die Un- 
terschiede zwischen den Eingabeanweisungen INPUT und GET: 


Anweisung INPUT: Anweisung GET: 
Eingabe mit /RET/ abschließen ... ohne /RET/ 
Ein oder mehrere Zeichen eingeben ... nur ein Zeichen 
PRINT ohne Warteschleife ... in Warteschleife 


Eingabe erscheint am Bildschirm ... erscheint nicht 
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3.1.4 Programm mit Unterprogramm 


Die Verwendung von Unterprogrammen bietet ent- 
scheidende Vorteile: 


- Ein in Unterprogramme gegliedertes Programm ist stets besser 
lesbar als ein ungegliedertes Gesamtprogramm. 


- Einen an mehreren Stellen im Programm benötigten Ablauf muß 
man nır e in ma 1 als Unterprogramm codieren. 


- Oft benötigte Verfahren können gesammelt und bei Bedarf im 
neuen Programm wie Ba us te i ne eingesetzt werden. 


- Bei größeren Vorhaben können Teilabläufe von verschiedenen 
Personen get rennt entwickelt und dann zu einem Pro- 
grammkomplex zusammengesetzt werden. 


In BASIC kann man Unterprogramme durch die Anweisungen GOSUB 
und RETURN oder durch Funktionen verwirklichen. Wir wenden uns 
zunächst den Anweisungen GOSUB und RETURN zu. 


3.1.4.1 Unterprogramme mit GOSUB und RETURN 


Programm DEMO-UPRO1I demonstriert, wie ein e in ma | codier- 
tes Unterprogramm (Zeilen 1000, 1010) zwei ma |] aufgeru- 
fen wird (Zeilen 140 und 180). Zu trennen ist also die Unter- 
programmcodierung (ein oder mehrere Zeilen mit RETURN am Ende) 
einerseits und der Unterprogrammaufruf (durch GOSUB) anderer- 
seits. In BASIC ist das Unterprogramm immer Teil des Hauptpro- 
gramms. 

Zweck des Unterprogramms ist es, die jeweilige Tastatureingabe 
um 10 zu erhöhen. Da sich die Eingabe im Hauptprogramm zuerst 
in X und dann in Y befindet, ist vor jedem Unterprogrammaufruf 
die Eingabe einer Variablen namens PAR (Parameter) zuzuweisen, 
um dann das Unterprogramm mit GOSUB 1000 aufzurufen, die Er- 
höhung mit 1000 LET PAR=PAR+10 auszuführen, mit 1010 RETURN 
in die jeweilige Folgezeile 150 bzw. 190 zurückzukehren und im 
Hauptprogramm fortzufahren. Die etwas umständliche Anweisungs- 
folge '140 LET PAR=X: GOSUB 1000: LET X=PAR' ist erforderlich, 
da ein Unterprogrammaufruf wie etwa 'GOSUB(X) 1000' mit einer 
tatsächlichen Parameterübergabe in BASIC nicht Standard ist. 


Ausführung zu Programm DEMO-UPRO1: 


EIH LINTERFROGRAMM ZWEIMAL AUFRUFEN. 
EINGABE YÜN 37 28 
ALISGABE YON #+18: 539 


EINGABE YON WW? 77r7TTr 
AUSGABE YOH Y+lcm: 77787 
ENDE. 
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140 LET PAR=X : GOSUB 1000 : LET X=PAR 


- Parameterübergabe: 
X nach PAR zuweisen 





-Unterprogrammaufruf 
(PAR erhöhen) 


Parameterübergabe: 
2. Unterprogyrammaufruf: PAR nach X zuweisen 


— = = = = = = = = _ === 


180 LET PAR=Y : GOSUB 1000 : LET Y=PAR 


Unterprogrammaufruf mit Parameterübergabe (Beispiel) 


Codierung zu Programm DEMO-UPROI: PAP zu DEMO-UPROI: 


106 REM ======PROGEAMM DEMO-UPRO1 

114 PRINT "EIN UNTERFRÜGREAMM ZWEIMAL AUFRUFEN." 
128 REM ###ERSTER UNTERPROGRAMM-AUFRUFESRASRSRRCK 
134 INPUT "EINGABE WÜN A',® 

148 LET FAR=k : GOSUB lage : LET A=PAR 

155 FRINT "AUSGABE YON »+1l2:",% 

158 REM #%#ZWEITER UNTERPROGEAMM-AUFRÜUFRRRERRERERN 
ira FRINT: INPUT "EINGABE WON T";Y 

158 LET FAR=T : GOSUB 1800 : LET 'Yr=PAR 

138 FRINT "AUSGABE YOH YHla:";'r 

2a@ PRINT "ENDE." : END 

ia: 

zen: 

230 REM ===UNTERFRÜÖGERMM “ERHOEHEN"=S===3======= 
iaaa LET FAR = FAR + 10 

10919 RETURN 

1436 REM ===ENTDE DES UNTERFRÜGERMMS====S======== 





Die Anweisung 140 GOSUB 1000 merkt sich die Folgezeile 150 als 
Rückkehradresse und verzweigt zu Zeile 1000 zum dort anfangen- 
den Unterprogramm. Die Anweisung 1010 RETURN beendet das Un- 
terprogramm und verzweigt zu der (zuletzt) gemerkten Rückkehr- 
adresse. Beispiele für Anweisungen zum Unterprogrammaufruf: 


- 140 GOSUB 1000 unbedingter Aufruf 

- 140 IF A=3 THEN GOSUB 1000 numerisch bedingter Aufruf 
- 140 IF B$="JA" THEN GOSUB 1000 Text-bedingter Aufruf 

- 140 ON C GOSUB 1000,2000,3000 Fallabfrage mit Aufruf 
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3.1.4.2 Standardfunktionen und selbstdefinierte Funktionen 


Funktionen sind besondere Unterprogramme, die stets mit ihrem 
Namen aufgerufen werden. Für häufig wiederkehrende Probleme 
sind Funktionen standardmäßig voraeqeben und für spezielle Be- 
nutzerprobleme können sie vom Benutzer selbst definiert werden. 


VORGEGEBENE STANDARDFUNKTIONEN AUFRUFEN: 

- Numerische Funktionen: 
Ganzzahl: INT(3.8) ergibt 3, INT(2,1111) ergibt 2 
Betrag: ABS(-2) ergibt 2, ABS(2) ergibt 2 
Vorzeichen: SGN(-2) ergibt -1, SGN(2) ergibt +1 
Zufallszahl: RND(1) ergibt z.B. 0.8724 
Weitere: ATN, COS, EXP, LOG, SIN, SOR, TAN 
(vgl. Abschnitt 2.3.2.2) 


- String-Funktionen bzw. Text-Funktionen: 
ASC, CHR$, INSTR, LEFT$, LEN, MID$, STR$, RIGHT$ und VAL 
(vgl. Abschnitte 2.3.2.2 und 3.3) 


- System-Funktionen: 
FRE(), PEEK und POKE (vgl. Abschnitt 3,5) 


FUNKTIONEN SELBST DEFINIEREN UND AUFRUFEN: 
- Definition der Funktion mit Anweisung DEF FN ... 
- Aufruf der Funktion durch FN ... 


Zwei Arten von Funktionen 


Das in Klammern hinter der Funktion geschriebene Argument kann 
eine Konstante (INT(9.7)), eine Variable (INT(Z2)) oder ein be- 
liebiger Ausdruck sein (INT(9.7+Z)). 


Das folgende Programm DEMO-FUNKTION!I demonstriert, wie eine 
vom Benutzer selbst definierte Funktion in ein BASIC-Programmm 
eingebaut werden kann. 

Programm DEMO-FUNKTION! stimmt in der Ausführung mit Programm 
DEMO-UPRO1 überein, nicht aber in der BASIC-Codierung: Das in 
DEMO-UPRO1 mittels GOSUB und RETURN geschriebene Unterprogramm 
wird in DEMO-FUNKTIONI über eine benutzerdefinierte Funktion 
mit DEF FN programmiert. In der hierfür vorgesehenen Anweisung 


140 DEF FN ERHOEH(PAR)=PAR+10 (Funktion definieren) 


schreiben wir hinter FN den Funktionsnamen ERHOEH, gefolgt 
von einem Parameter PAR, dem das Ergebnis von PAR+10 zugewie- 
sen wird. 

Als forma 1 e r Parameter vertritt PAR beim Unterprogamnm- 
aufruf den entsprechenden akt ue 1 len Parameter X (für 
1. Aufruf: FN ERHOEH(X)) bzw. Y (für 2. Aufruf: FN ERHOEH(Y)). 
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Codierung zu Programm DEMO-FUNKTIONI: 


1269 REM ======FROGRAMM DEMO-FUNKTIOH 

118 PRINT "EINE FUNKTION SELBST DEFINIEREN" 

1258 PRINT "UND DANN ZWEIMAL AUFRUFEN." 

121: 

138 REM ###FUNKTION DEFINIERENEEEFEFREERFEREITEERERENN 
145 DEF FN ERHÜEHSFAR> = PAR + 16 

158 : 

162 REM ##%#ERSTER FUNKTTONHS-AUFRÜFRERERRERSERRNER AA 
ira INPUT "EINGABE WON KR 

154 PRINT "AUSGABE WON ArHla:"; FM ERHOEHTA? 

138 REM ZWEITER FUNKTIONS-RUFRUÜFRREERREREERNEIRRICH 
2a8 INPUT "EINGABE YON T"; Y 

2ia FRINT "AUSGABE YON Y+1R:"5 FH ERHOEH“YV) 

22a FRINT "ENDE." : ENI 


Ausführung zu Programm DEMO-FUNKTIONI: 


EINE FUNKTION SELBST DEFINIEREN 

UND DANN ZWEIMAL AUFRUFEN. Aktuelle Paraneket 77 

EINGABE VON X? 28 werte X=25 und I= 

AUSGABE YOH X+1B: 2 werden jeweils dem 
formalen Parameter 


EINGABE YON Y? 77777 
AUSGABE VON T+la: 77757 


übergeben. 


3.2 Drei Beispiele zur Programmiertechnik 


Zu den in Abschnitt 1.3.7.4 dargestellten Programmiertechniken 
betrachten wir drei Beispiele: Menütechnik, Standardisierung 
und Verzweigungstechnik mit Wahrheitswerten. 


3.2.1 Strukturiert programmieren: Menütechnik 


Bei der Ausführung des Programms MENUE1 werden dem Benutzer 
sieben Wahlmöglichkeiten am Bildschirm angeboten - vergleich- 
bar mit den Gängen eines Menüs auf der Speisekarte. Aus diesem 
Grunde spricht man in der DV von der Menütechnik. 
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Folgende Punkte kennzeichnen die Menütechnik: 


(1) Auswahl einer Tätigkeit aus dem Menü: 
Das Menü wird am Bildschirm gezeigt, bis der Benutzer eine 
gültige Auswahl getroffen hat (Unterprogramme 'GOSUB 1000' 
und 'GOSUB 2000' in Programm MENUEI). 


(2) Ausführung dieser Tätigkeit in einem Unterprogramm: 
Über eine mehrseitige Auswahl als Fallabfrage wird ein Un- 
terprogramm aufgerufen (Anweisung 150 ON M GOSUB ...), um 
die gewählte Tätigkeit dann auszuführen. 


(3) wiederholtes Menüangebot mit Programmende über das Menü: 
Nach dieser Ausführung wird das Menü erneut gezeigt. Die 
Schleife wird mit DO-LOOP-EXIT gesteuert. Abgebrochen wird 
der Programmlauf stets über das Menü selbst (Menüwahl 7) 
bzw. über das Steuerprogramm (hier Zeile 160), nicht aber 
über ein Unterprogramm. 


Die sieben Tätigkeiten KONTOSTAND, EINZAHLUNG,.. werden in den 
zeilen 1030-1040 unter DATA gespeichert. Soll das Menüprogramm 
für andere Zwecke verwendet werden, müssen ausschließlich die- 
se Zeilen geändert werden. 


Zu den Anweisungen READ-DATA: 

Die Anweisungen READ mit DATA dienen der Speicherung programnm- 
interner Daten. Jede READ-Anweisung rückt dabei einen Lese- 
zeiger um I weiter. Die Anweisung RESTORE setzt den Lesezeiger 
auf die Ausgangsposition 1 zurück. Daten können auf beliebig 
viele DATA-Anweisungen verteilt werden; wesentlich ist allein 
die Reihenfolge: so sind die folgenden Anweisungen identisch: 


10 DATA 4,7 entspricht 10 DATA 4 
11 DATA 7 
Die Abbildung zeigt an einem Beispiel, wie über eine FOR-NEXT- 
Schleife als Lesesch lei f e Daten aus sieben DATA- 
Zeilen in einen Array namens M$() eingelesen werden. Da unter 
DATA auch eine größere Sammlung von Daten programmintern abge- 
speichert werden kann, bezeichnet man diese Daten häufig auch 
als interne Datei. 


1000 READ N Nach N wird die Ziffer 7 eingelesen, 
1010 FOR I=1 TON Nach M$ werden 7 Textworte eingelesen 
1011 READ M$(I) (M$ ist ein String-Array). 


1012 NEXT I 
Inhalt von M$: 


1030 DATA 7, KONTOSTAND KONTOSTAND 
1031 DATA EINZAHLUNG,AUSZAHLUNG EINZAHLUNG 
1032 DATA NEUES KONTO, KONTO LOESCHEN AUSZAHLUNG 
1033 DATA GESAMTLISTE, PROGRAMMENDE NEUES KONTO 
KONTO LOESCHEN 
READ weist einer oder mehreren Variablen GESAMTLISTE 
Werte zu, die unter DATA gespeichert sind. PROGRAMMENDE 


Anweisungen READ und DATA zur Datenspeicherung im Programm 
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Die Anweisung 
150 ON M GOSUB 3000,4000,5000,6000,7000,8000,9000 


ruft für M=1 das Unterprogramm ab Zeile 3000 auf, für M=2 das 
Unterprogramm ab Zeile 4000 usw, wobei als Rückkehradresse für 
die RETURNs die Zeile 140 gespeichert wird. Durch die Fehler- 
abfragen in Zeile 2040-2050 wird sichergestellt, daß in M tat- 
sächlich nur einer der ganzzahligen Werte 1,2,....,7 vorliegt. 


In Zeile 2030 wird die Menü-Auswahl des Benutzers bewußt nicht 
einer numerischen Variablen W, sondern einer Textvariablen W$ 
zugewiesen. Damit soll ein "Aussteigen! des Computers bei feh- 
lerhafter Eingabe verhindert werden. Mit dem Funktions-Aufruf 
VAL(W$) wird der Text in W$ in einen Zahlenwert umgewandelt. 


Codierung zu Programm MENUEI: 


ing REM ======PROGEAMM MENLEI 

11a FRINT "MENUE-DEMOPRÜGERMM MIT MAHL IN DATA." : PRINT 
120 GO5SUE 1898 : REM MENUE-ANGEBOT EINLESEN 

136 DJ 

148 GOSUE 2804 : REM MEHUE-WUAHL BEREITSTELLEN 

158 CM M GOSUE 3088, 4004, 5000, 6008, 7008, 5008, 9090 

154 IF M=7" THEHN EXIT 

170 IMFUT "WEITER MIT RETURN" WE: PRINT CHRECI47> 

130 LOOP 

139 PRINT "ENDE." : END 

zuu 

216 

22a REM #&*%#MENLIE-ANGEBOT HACH M$ EINLESENKEERERRERTTERIEETITEK 
185 RERL N : DIM M$CHND 

ieia FOR I=1 TON : FEAT MEET: : NERT I 

1aza RETURN 

12358 DATA 7, KONTOSTAND, EINZAHLUNG, AUSZAHLUNG, "NEUES KONTO" 
nen DATA KONTO LOESCHEN „GESAMTLISTE, PRÜGRAMMENDE 

195 

10653 REM ###MENUE-AUSWAHL IN M BERE ITSTELLE NAAR 
zuaB FRINT "-------- MENUE-ANGEBOT------ 

zB1le FÜR I=1 TO N : PRINT " "TI," "ME I} ı: NEAT I 

zB2R PRINT "----------- mine 

2938 IHPUT "MENLE-AUSWUAHL TIFFEN"SWE : LET M=VALCHE 

2548 IF M <> IMTEM> THEN PEINT "... GANZZAHLIG": GOTO 2098 


29509 IF Mi OR MEN THEH FRINT "... NUR 1 - 7": GOTD 2860 
za6G0 RETURN 

zu? : 

sand FEINT "UNTERFRÜGEAMM ";M&CHM) : RETURM 

4aaa PRINT "UNTERPRÜGEAMM ";M£cH: : RETURM 

saaa FREIMT "UNTERPRÜGRAMM ";M&CH> : RETURM 

£aag PEIHT O"UNTERPEÜGERAMM "SM$cH5 : RETURN 

"aa PRINT "UNTERFRÜGRAMM ";M£CoM> : RETURN 

Bang FEINT "UHTERFRÖGRAMM ";MECH> ©: RETURN 

Zaaa FRIHTO"UMTERFRÖGERAMM ";M$eMS © RETURN 
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Ausführung zu Programm MENUEI: PAP zu MENUEI: 


MEHUE-DEMÖFROGERMM MIT WAHL IN DATA. 


1 KOMNTOSTAND 

& EINEAHLUNG 

3 AUSZAHLLNG 

4 NEUES KONTO 

> KONTO LOESCHEHN 

6 GESAMTLISTE 

” FROGRAMMENDE 
MENUE-AUSWAHL TIPPEN: 4 
UNTERFROGRAMM NEUES KONTO 
WEITER MIT RETURN 


1 KONTOSTANI 

2 EINZAHLUNG 

3 RUSZAHLLNG 

4 NEUES KONTO 

s KONTO LOESCHEN 

& GESAMTLISTE 

?  PRÖGRAMMENDE 
MENLE-AUSWURHL TIPPEN: 7 
ne NOGRAMM PRÜGRAMMEHNDE 
NDE. 





3.2.2 Wirtschaftlich programmieren: Standardisierung 


In einer Kundendatei soll für jeden Kunden die NUMMER, der NA- 
ME und der UMSATZ gespeichert werden; in einer Artikeldatei zu 
Jedem Artikel die BEZEICHNUNG, der PREIS und die MENGE; ... Je 
nach Dateiart ist das Eingabeproblem ähnlich. Unwirtschaftlich 
wäre es, für jedes Problem je ein neues Programm schreiben zu 
mussen. Programm STANDARD1I zeigt die Problemlösung über ein 
Programm auf. Zwei va ariablenebenen werden 
dabei unterschieden: eine Ebene nimmt Beschreibungen über die 
Daten auf, während die andere Ebene die Daten selbst betrifft. 


- Variablen mit beschreibenden Daten: 
Die Variablen ND$(), TD$() und LD() nehmen Angaben zu Namen, 
Datentypen und Längen der Daten auf. Diese Daten sind in der 
DATA-Zeile gespeichert. Bei Änderung ist somit nur die DATA- 
Zeile zu überprüfen. 


- Variablen mit den eigentlichen Daten: 
Die Variable ID$() steht für den eigentlichen "Inhalt der zu 
verarbeitenden Daten', z.B. für die drei Artikelangaben '101 
WILLIAMS BIRNE 3470.50'. 
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Die Anweisung 

250 DIM ND$(AD) 
richtet für die Variable ND$ drei 'Fächer' (da AD=3) zur spä- 
teren Speicherung von drei Strings ein. Diese Dimensionierung 
mittels DIM erklären wir in Abschnitt 3.6 ausführlich. 


Programm STANDARDI verdeutlicht das prinzipielle Vorgehen beim 
Arbeiten mit zwei Variablenebenen und ist je nach Anwendung zu 
ergänzen: so fehlt z.B. die Prüfung für das UMSATZ-Format 6.2 
(6 Stellen, 2 Dezimalstellen). 


Codierung zu Programm STANDARDI: 


180 REM ======PROGRAMM STANDARDI 

118 : 

128 REM ======YEREINBARUNGSTEIL 

130 REM AD: INTEGER (ANZAHL DER DATEN? 


148 REM ND#C): ARRAY CBESCHREIEBENDE EBENE: DATENNAMEN? 
150 REM TD$C)H: ARRAY CBESCHREIBENDE EBENE: DATENT'YPEN? 
150 REM LDE>: ARRAY <BESCHREIBENDE EBENE: DATENLAENGEN? 
ira REM ID$C): ARRA'T CINHALTLICHE EBENE: DATEN SELBST) 
135 REM BEI RENDERUNG NUR ZEILE 238 RENDERN 

Ir REM CI=INTEGER, S=STRING UND R=REALZAHL > 

ag: 

219 REM ======ANWEISUNGSTEIL 

220 REM ##&#BEZEICHNUNGEN SPETCHERNKAHHRRAEHRREERSSIEKACK 
238 DATA 3, NUMMER, 1,3, NAME, 5,18, UMSATZ,R,6.2 

248 REM BEHLESESCHLE TFERRABRSRRBISR AIR RSE RE NERSSERSIHK AI 
258 READ AL : DIM HDECAD), TDSCAD>,LDCAD>,, ID$CAD) 
zei FOR Z=i TO AD 
2zra  RERAD ND$CZ3, TD$CZI,LDCZN 
258 HEAT Z 
23a REM ###E INGABESCHLE TFERRRRERER ÄRA RÄT 
saa FÜR Z=1 TO AD 
sig PRINT NDECZ3;5" ",;: INPUT ID$CZ} 
328 HEHT Z 
330 REM #%#5TRING-LAENGE FRUEFEN ALS BEISPIELKHRRRH 
34a FOR Zei TO AD 
ssg IF TO$cZ>="5" AND LEHKIDFCZIDSLDOKZ> THEN 378 
360 FRINT "FEHLERFREI: ";ID$CZ>: GOTO 380 
378 PRINT "FEHLERHAFT: ";ID$C27," VEBER ":LDCZ)5" STELLEN." 
33a MEHT Z 
334 FREINT "ENDE." : END 


Ausführung zu Programm STANDARDI: 


HUMMER? 1e1 

HAME? WILLIAMS BIFHE 

LMSATZ? 3470.50 

FEHLERFREI: 161 

FEHLERHÄAFT: WILLIAMS BIFENE LEBER 14 STELLEN. 
FEHLERFREI: 3470.50 

ENDE. 
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3.2.3 Einfach programmieren: Verzweigungstechnik 


Das Programm BOOLEANI verwendet das Zeichen "=" zur Zuweisung 
und auch zum Vergleich: 


120 LET BI = X=Y 


Das erste "=" in Zeile 120 ist eine Wertzuweisung 
nach B1: Das Ergebnis von X=Y wird nach Bi zugewiesen. 

Das zweite "=" dagegen bewirkt einen Vergleich: Dabei 
ist X=Y ein Vergleichsausdruck mit dem "=" als Vergleichszei- 


chen und dem Ergebnis WAHR oder UNWAHR, das dann der Variab- 
len Bi zugewiesen wird. Bil steht für "Bedingung 1'. Der THEN- 
zweig in Zeile 130 wird nur ausgeführt, wenn Bi den Wert WAHR 
hat. 

Variablen, die nur die Werte WAHR (bzw. TRUE) und UNWAHR (bzw. 
FALSE) annehmen können, nennt man boolesche Variablen. Damit 
wird der Mathematiker George Boole geehrt, der um 1850 die Lo- 
gik erforscht hat. Commodore-BASIC sieht den Datentyp BOOLEAN 
(vgl. Abschnitt 1.3.2.1) explizit nicht vor. Gleichwohl können 
wir diesen Typ wie in Programm BOOLEAN! gezeigt verwenden. 


Codierung zu Programm BOOLEAN!: 


186 REM ======FROGRAMM BOOLEANI 

118 INFUT "ZWEI ZAHLEN EINGEBEN"; %,'r 

iza LET Bl = x=7 

1598 IF Bi THEN PRINT "BEIDE ZAHLEN GLEICH." 
i4@ PRINT "ENDE." : END 


Zwei Ausführungen zu Programm BOOLEANI: 


ZWEI ZAHLEN EINGEBEN? 4 ‚, 4 ZWEI ZAHLEN EINGEBEN? 16 ‚, 166 
BEIDE ZAHLEN GLEICH. ENDE. 
ENDE. 


Vergleichsoperatoren =, >, >=, <, <= und<>: 

Vergleichen wir z.B. zwei Zahlen, so werden die Vergleichser- 
gebnisse WAHR bzw. UNWAHR in Commodore-BASIC durch die Zahlen 
-1 (für WAHR) bzw. O0 (für UNWAHR) dargestellt. 

Das Programm BOOLEAN2 demonstriert dies. Neben = lassen sich 
auch die Vergleichszeichen >, >=, <, <= und <> einsetzen. 10>6 
z.B. ergibt den Wert WAHR bzw. -1 und 2<>2 den Wert 0. 


Codierung zu Programm BOOLEAN2: 


128 REM ======PRÜGRAMM BOOLERNZ 
110 PRINT "DARSTELLUNG DES DATENTYPS “EOOLERN” IN BASIC 2.5." 
128 PRINT "WAHR BZW. TRUE — -> "; 3=3 


130 FEINT "UNWAHR BZW. FALSE -> "5 3 
142 PRINT "ENDE." : END 
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Ausführung zu Programm BOOLEAN2: 


DARSTELLUNG DES DATENTYTFS “BOOLERN“ IN BASIC 3.5. 


WAHR BZU. TRUE -2 -1 
LINWAHR BZU. FALSE -> 06 
ENDE. 


Logische Operatoren AND, OR und NOT: 

Das Programm BOOLEAN3 zeigt, wie mehrere Vergleichsbedingungen 
durch logische Operatoren (auch boolesche Operatoren genannt) 
verknüpft werden können: so durch AND (und), OR (oder) und NOT 
(nicht). AND, OR und NOT werden in der Booleschen Algebra zur 
Erklärung logischer Zusammenhänge verwendet. Die Grundlage da- 
zu bilden die sogenannten Wahrheitstafeln. 


I1’AND 1-2 1 17OR Se} NOT 1= U 
ı AND 0 = O9 1 OR =. 1 NOT 0.= 1 
0 AND 1I1= 0 DDR ITET 
0 AND 0 = 0 OR: de DD 


Wahrheitstafeln für logisch 'und', "oder' sowie "nicht' 


Für X=1 und Y=0 ergibt der boolesche Ausdruck X AND Y den 
Wert FALSE bzw. 0 und X OR Y den Wert TRUE bzw. 1. Mehrere 
boolesche Operatoren können in einem Ausdruck auftreten. Zwei 
Beispiele hierzu: NOT(X OR Y) ergibt den Wert FALSE, während 
(X>-100)AND(X<100) den Wert TRUE ergibt. 

Logische Operatoren arbeiten stets nur mit den Zahlen O0 und 1. 


Codierung zu Programm BOOLEAN3: 


1904 REM ======PFROGEAMM BOOLEAHS 

11dg INFUT "DREI “UDERTER” EINTIPPEN"; A$,B$,CH 

120 LET Bl = H#=Bb$ 

134 LET BZ = B$=C$ 

140 IF Bi AND BZ THEH FRINT "ALLE DREI GLEICH." 

150 IF Bi OR BZ THEN PRINT "DIE ERSTEN ODER LETZTEN BEIDEN GLEICH, 


166 IF NOT BZ THEN FEIHT "DIE LETZTEN BEIDEN LINGLEICH. " 
ira PRINT "ENDE." : ENI 


Ausführungen zu Programm BOOLEAN3: 


DREI "WOERTER” EINTIFPEN 
616,C116,C16 

DIE LETZTEN BEIDEN UNGLEICH. 
EHDE. 


DEEI "WÖERTER” EINTIFFEH 

CEM,CBM,CBM 

ALLE DEEI GLEICH. 

DIE ERSTEH ODER LETZTEH BEIDEN GLEICH. 
EHIE. 
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In Verzweigungen mittels IF werden oft Vergleichsoperatoren 
und logische Operatoren gemeinsam benutzt. In der Anweisung 


570 IF (BETRAG>1000) AND (TAGE<8) THEN 700 


z.B. werden zuerst die Vergleichsoperatoren ">größer" sowie 
"< kleiner" ausgeführt, die -1 bzw. 0 als Ergebnisse liefern. 
Auf diese Vergleichsergebnisse wird sodann der logische Opera- 
tor "AND bzw. und" angewandt. Betrachten wir dazu das folgen- 
de Zahlenbeispiel mit BETRAG=3000 und TAGE=2 bzw. TAGE=9: 


- Für BETRAG=3000 und TAGE=2 erhalten wir IF (-1) AND (-1)... 
und dann IF (1111) AND (1111)... mit -1 als Binärzahl 1111; 
IF 1 THEN 700 wird in Commodore-BASIC als Vergleichsausdruck 
IF 1€<>0 THEN 700 behandelt; wir erhalten IF -1 THEN 700 und 
es wird also nach Zeile 700 verzweigt. 


- Für BETRAG=3000 und TAGE=9 erhalten wir IF (-1) AND (O)..., 
dann IF (1111) AND (0000)..., dann IF O0 THEN 700. Mit der 
Anweisung IF 0<>0 THEN 700 wird nicht verzweigt, sondern 
mit der Folgezeile fortgefahren. 


Wichtig ist, daß in Commodore-BASIC die beiden Anweisungen 
100 IF B THEN ... und 100 IF B<>0 THEN ... die gleiche Bedeu- 
tung haben (siehe Abbildung). Das bedeutet, daß für B=0 nicht 
verzweigt wird, während für alle anderen Werte von B (z.B. 1, 
2,32..,7-157-2,-3,...,0.1,0.2,...) die Verzweigung durchgeführt 
wird. In Commodore-BASIC stellen somit nicht nur -1, sondern 
alle Zahlen ungleich null den Wert WAHR bzw. TRUE dar. Gleich- 
wohl ordnen wir (wie bei allen Computern üblich, die logische 
Variablen explizit vorsehen) den Zahlenwert -1I dem Wert WAHR 
zu. 


100 IF B THEN ... 1. Für B=0 wird nicht verzweigt. 
B=0 bedeutet UNWAHR bzw. FALSE. 
gleichbedeutend mit 
2. Für Be&>0 wird verzweigt. Alle Werte 
100 IF B<>0 THEN ... B<>0 bedeuten WAHR bzw. TRUE. 


Anweisung .„.. IF B THEN ... zur bedingten Verzweigung 


Commodore-BASIC stellt die Vergleichsergebnisse -1 bzw. 0 als 
Binärzahlen 1111 bzw. 0000 dar und führt jede Verknüpfung mit 
logisch AND bitwe i se durch. In Abschnitt 3.5.3 gehen 
wir auf die bitweise Verarbeitung genauer ein. 


Die drei Programmbeispiele BOOLEAN!I - BOOLEAN3 zeigen, daß in 
BASIC neben den Datentypen INTEGER (Ganzzahl), REAL (Dezimal- 
zahl) sowie STRING (Text, Zeichenkette) auch der Typ BOOLEAN 
(Wahrheitswert) verwendet werden kann. Dabei sind zwei Punkte 
festzuhalten: 

Das Anweisungswort LET sollte stets beibehalten werden. Sicher 
ist 20 LET BI = X=Y besser lesbar als 20 Bi1=X=Y . Dennoch 
bewirken die Anweisungen dasselbe: vergleiche X mit Y und wei- 
se das Ergebnis WAHR bzw. UNWAHR als -1I bzw. 0 der booleschen 
Variablen BI zu. 
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3.3 Textverarbeitung 


Mt Textverarbeitung ist hier nicht das kauf- 
männische Standard-Programmpaket gemeint (siehe dazu Abschnitt 
1.3.8.3), sondern das Zerlegen und Zusammenfügen einzelner Da- 
ten vom Typ 'Text' bzw. 'String'. Man spricht dabei häufig von 
Stringverarbeitung. 


3.3.1 Stringoperationen im Überblick 


BASIC stellt die Standardfunktionen INSTR, LEN, LEFT$, RIGHT$, 
MID$, VAL, STR$, CHR$ sowie ASC bereit. 





Funktionen zur Verarbeitung von Strings 


Diese Stringoperationen wollen wir an Beispielen betrachten. 
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3.3.2 Zeichen und Strings suchen und umformen 


Das Programm ZEICHSUCHI bezweckt, ein Zeichen 2$ in dem String 
bzw. Text E$ zu suchen. S dient als Merker bzw. Flagge (Flag). 
Durch MID$(E$,I,1) wird das 1., 2., »... Element des Texts E$ 
angesprochen und mit 2$ verglichen. 

Die Zählerschleife wird in jedem Fall über 320 NEXT I verlas- 
sen (Prinzip: nur e i n Schleifenausgang). 

Das Programm ZEICHSUCHI umfaßt zwei Programmstrukturen: eine 
Wiederholungsstruktur (Zählerschleife in den Zeilen 270-310) 
und eine Auswahlstruktur (zweiseitige Auswahl in 360-370). 


Codierung zu Programm ZEICHSUCH!I: 


ia REM ======PROGEAMM ZEICHSUCHI 

ila PRINT "EIN ZEICHEN SUCHEN OHNE FUNKTION INSTR." 
128 : 

158 REM ======V/ERETINBARUNGSTEIL 

14a REM E#: STRING SEINGABETEAT BELIEBIG) 

158 REM Z#: STRING <ZU SUCHENDES ZEICHEN? 

168 REM 5: INTEGER “STELLE MIT ZEICHEN} 

ira REM L: INTEGER <LREHGE DES TEATES E$) 

158 REM I: LAUFYARIABLE FUER SCHLEIFE 


2la INFUT "TEAT EIMTIFPEN: ";E$ 

228 INFUT "ZU SUCHENDES ZEICHEN EINTIFFEN: ",2$ 

230 IF LENCZSI<CHL THEN 220 : REM MEHR ALS 1 ZEICHEN 

240 LET L=LENGE$, : REM LAENGE WON E$ 

25a LET 5=0 : REM ANFANGSWERT SETZEN 

260 REM ##%BEGINN DER SUCHSCHLETFEREERSR I 

era FOR I=1 TOL 

288 PRINT 1,5". STELLE YON TEXT ";E$ : REM KÖONTROLLAUSGABE 
2394 IF MID$CE$,1I.1> <> Z# THEN 320 : REM FALLS NICHT GEFUNDEN 
sad LET 5=I : REM STELLE 5 MERKEH 

319 Es I=L : REM LAUFYARTABLE AUF ENDWERT SETZEN 
sza NE=T I 

330 REM #%#ENDE DER SUCHSCHLEIFERKEEFFERFERTTEE EN E 


3249 FRINT: PRINT "SUCHERGEENIS:" 

5608 IF 5=8 THEN PRINT Z$:" NICHT GEFUNDEN." : GOTOD 388 
3ra FRINT 2$:" AH ";5;". STELLE IM STRING ";E$ 

s54 PRINT "PEOGRAMMENDE. " 


Ausführung zu Programm ZEICHSUCHI: 


EIN ZEICHEN SUCHEN OHNE FUNKTION INSTR. 
TEAT EINTIFPEN: COMMODORE COMPUTER 
ze SUCHENDES ZEICHEN EINTIPPEN: M 

i .„ STELLE “ON TE#AT COMMODORE COMFUTER 
. STELLE VON TE#AT COMMODORE COMPUTER 
. STELLE YOH TEAT COMMODORE COMFUTER 


SUCHERGEENIS: 
MAH 3. STELLE IM STEING COMMODORE COMPUTER 
PROGRAMMENTE . 


Gıfd 


160 3 Programmierkurs mit Commodore-BASIC 3.5 


Das Programm ZEICHSTRINGSUCHI demonstriert die Funktion INSTR: 
der Suchstring 2$ soll im Gesamtstring E$ gesucht und dann die 
erste Stelle ausgegeben werden. Mit INSTR kann ein String (als 
zeichenfolge) oder auch ein einzelnes Zeichen gesucht werden. 
Die Ausführungsbeispiele zeigen, daß INSTR mit der Suche ab- 

bricht, sobald ein Suchstring (z.B. "O0") gefunden wurde. 


Codierung zu Programm ZEICHSTRINGSUCHI: 


1856 REM ======PROGEAMM ZEICHSTEINGSUCHI 
110 PRINT "EIN ZEICHENFSTRIG IN EINEM TEXT SUCHEN UNTER" 
120 FEINT "VERWENDUNG DER FUNKTION INSTR." 
139 : 
140 REM ======V/EREINBARUNGSTEIL 
150 REM E$: STRING CEINGABETEXT BELIEBIG} 
1658 REM Z$: STRING SZU SUCHENDES ZEICHEN ODER TEILSTRING} 
ira EEM 5: INTEGER “STELLE IN E$, AN DER Z# BEGINNT CA=FEHLER>} 
Io: 
134 REM ======ANWEISUNGSTEIL 
zaa INPUT "WELCHER TEAT":E$ 
218 INFUT "WELCHEN TEILSTRING SUCHEN"; 2$ 
22 LET S=INSTRCEF, 2) 
250 IFS=0 THEN PEINT "HICHT GEFUNDEN": 
ELSE PRINT "AB STELLE";S 
248 FEINT "ENDE.": ENI 


Ausführungen zu Programm ZEICHSTRINGSUCHI: 


EIN ZEICHEN’STRIG IM EINEM TEAT SUCHEN UNTER 
VERWENDUNG DER FUNETIOH INSTR. 

WELCHER TE#T? COMMÖDORE PLUSs’4 

WELCHEH TEILSTEING SUCHEN? MOD 

AE STELLE 4 

EHIE. 


HELCHER TE#T? COMMODORE PLUS,4 WELCHER TEXT? 129.25 DM 
WELCHEN TEILSTEING SUCHEN? MÖDE  MELCHEN TEILSTEING SUCHEN? = 
HICHT GEFUHDEN AE STELLE 2 

ENDE. ENDE. 


WELCHER TEAT? COMMODORE FLUS,4 
HELCHEN TEILSTRING SUCHEN? 0 
AB STELLE & 

ENDE. 


Das Programm STRINGSUCH1 zeigt, wie über die Funktion MID$ ein 
String 2$ im Gesamtstring gesucht werden kann. Im Gegensatz zu 
INSTR wird bei MID$ die Suche nicht bereits beim ersten Auf- 
treten des Suchstrings abgebrochen. Sucht man "WE" im String 
"WEGWEISER", erhält man die 4 als Anfangsstelle von "WE" (sie- 
he Ausführungsbeispiel). 
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Codierung zu Programm STRINGSUCH]I: 


ig REM ======PRÜGERAMM STRINGSUCHL 

118 PRINT "EINEN STRING IN EINEM TEXT SUCHEN CMIT MIDE>." 
120 INPUT "TEXT EIMTIPPEN"; E$ 

134 INFUT "ZU SUCHENDEN STEING EINTIFFEH": 2% 

i4a FÜR I=1 TO <LENGEF>-LENCZF+IN 

ıisa IF MIDSCEF.T.LENCEFS =Z# THEN LET 5-1 

IE NEXT I 

ira IF S>20 THEH FRINT Z$;" BEGINNT MIT STELLE "5 

15a PRINT "ENDE." : EMD 


Ausführungsbeispiele zu Programm STRINGSUCHI: 


EINEH STRING IM EINEM TE=T SUCHEN MIT MIDE)., 
TE#T EINTIFFEN? COMMODORE 216 

EU SUCHENDEHN STRING EINTIFFEN? OFE 

NRE BEGINNT MIT STELLE 7 

ENDE. 


EINEN STEING IM EINEM TEXT SUCHEN £MIT MIDE}. 
TEAT EINTIFFPEN? WEGWEISER 

ZU SUCHENDEN STEING EINTIPFEN? WE 

WE BEGINNT MIT STELLE 4 


Das Programm TEXTUMKEHREN! kehrt den Text T1$ zu T2$ um. Dabei 
wird in einer Zählerschleife mit Schrittweite -1 das letzte, 
vorletzte, ... Element von T1$ entnommen und an den String T2$ 
angehängt. Dazu wird vor dem Schleifeneintritt ein Leerstring 
T2$ erzeugt (Zeile 210), an den dann wiederholt Zeichen ange- 
hängt werden. 


Codierung zu Programm TEXTUMKEHREN]: 


109 REM ======PRÜGERMM TEXSTUMKEHREHI 
112 PRINT "UMKEHREN YOH TEAT MIT FUNKTION MID," 
12d REM ======VERETINBARUNGSTEIL 


1224 REM T1$: TEAT (AUSGANGSTERT) 

140 REM T2$: TEXT CUMKEHRTEAÄT} 

13a REM L: INTEGER “LAEHGE YON Ti$) 
168 REM I: INTEGER “LRAUFYRRIABLE?} 


REM ======AHWEISUNGSTEIL 
INPUT "WELCHEN TEAT UMKEHREN"; T1$ 
LET L=LEN(CT1$> : REM LRENGE DES STRINGS T1$ 
LET T2$="" : REM STRING T2# ALS LEERSTEING MIT LAENGE 3 
FOR I=L TO 1 5TEP -1 : REM ZAEHLEN YON L BIS 1 HINUNTER 
LET T2$=T2$+M1D$T1$.1.15 : REM I. ZEICHEN AN T2# ANHRENGEN 
FRIHNT L-I+1;". SCHLEIFENDURCHLAUF: ":T2$ : REM KONTROLLAUSGABE 
MET I: REM NRECHSTES ZEICHEH NEHMEN 
FRINT : FRINT T1$;" WURDE UMGEKEHRT ZU ",T2$ 
z/a PRINT "ENDE.": END 


— ri On) 
ER ETF ENT 


DRIUDTDTIm m 
Run 
GG A 


IM 
on 
Go 
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Ausführung zu Programm TEXTUMKEHRENI: 


LIMKEHFEH WON TEAT MIT FUNKTION MID$. 
WELCHEN TEAT UMEKEHREN? C 16 


1 „ 5SCHLEIFENDURCHLAUF: & 

& . SCHLEIFENDUECHLAUF: 81 

3 „ 5CHLEIFENDURCHLAUF: 61 

4 „ SCHLEIFENDUECHLAUF: 61 C 
C 15 WURDE UMGEKEHRT ZU 61 CL 


EHDE. 


Das Programm AUSEINANDER1I wendet die Funktion STR$ zur Umwand- 
lung einer Zahl Z in einen String 2$ an, um die einzelnen 2Zif- 
fern auseinanderziehen zu können. 


Codierung zu Programm AUSEINANDER]: 


10909 REM ======Al5SEINANDERI 

11a FRINT "ZIFFERN AUSEINAHDERZIEHEN. " 

129 INPUT "ZAHL EINGEBEN"; Z 

129 LET Z$=5TF#VZ) : REM ZAHL IM STRING UMWAHDELH 
1460 FÜR I=1 TO LENGZE) 

154 FRINT MIDELZF.I, 12," 


158 NE=T I 

ira END 

ZIFFEFH AUSEINAHTDERZIEHEH, ZIFFERH AUSEINANDERZIEHEN. 

ERHL EINGEBEN? 1.2 ZAHL EINGEBEN? 3623.75 
1.2 sb 25.75 


Durch das Programm RECHTSBUENDIG]I wird Text rechtsbündig aus- 
gegeben. Dazu wird ein String L$ mit Z Blanks bzw. Leerstellen 
aufgebaut, an den der Eingabetext E$ angehängt wird. Dann wer- 
den mit RIGHT$(G$,Z2) die Z rechtsstehenden Zeichen auszugeben. 


Codierung zu Programm RECHTSBUENDIG]1: 


REM ======FEOGEAMM FRECHTSBUENDIGI 
FRIHT "TE#T RECHTSEUENDIG AUSGEREN." : FREINT 
PEIHT "STELLENANZAHL BEN. ZEILENBREITE:" 
INFUT Z 

FOR I=1 TO Z: LET L$=L$ + " " : NEST I 
FRIHT "TE®TEINGABE CUNTER ";2;" STELLEN." 
INFUT E# 


LET Gt=L_F+E$ 

LET A$=RIGHTFCGF,Z> 

FEIHT: FRIHMT "TERTAUSGABE FECHTSBLIENDIG:" 
FEIHT A 

EHI 


u 5 u u ae u SE En Eu 
az 


f.i I me es det pet je fe faub jeb je fh 
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Ausführung zu Programm RECHTSBUENDIG!I: 


TEXT RECHTSBUENDIS AUSGEEREN. 
SIE -LENANZAHL BZ. ZEILENBREITE: 


TEKTEINGABE UNTER 320 STELLEN}. 
COMMODORE Cie 


TE»TAUSGABE RECHTSBUENDIG: 
COMMODORE C16 


Codierung zu Programm FUEHRENDENULL]: 


100 REM ======PROGEAMM FÜEHRENDENULL1 

119 FRINT "EINE ZAHL UM FUEHRENTDE NULLEN ERWEITERN." 

120 INFUT "ANZAHL DER STELLEN INSGESAMT": A 

134 INPUT "FOSITIVE GANZZAHL "ı £ 

140 LET Z$=5STR$CE) 

158 LET Z$=RIGHT$LEF.LENTZEI-1>: REM VORZEICHENSTELLE WEG 
160 LET Z$=RIGHTEe"OnaBoBaRaamagan" + ZE,R) 

ira PRINT 2 

152 FRINT "ENDE." : END 


EIHE ZAHL UM FÜEHRENDE HULLEN EFWEITERH. 
ANZAHL DER STELLEH INSGESAMT? za 
PÜSITIYE GAHZERAHL? 143 

ala las Tea 15 bs 12 alas Ts a 1a DR 3 

ENDE. 


Das Programm STRINGBLANKSI demonstriert die Funktion LEFT$, um 
Text mit Blanks zu erweitern. Ein solcher Ablauf wird z.B. be- 
nötigt, um bei einer Datei eine feste Datensatzlänge zu errei- 
chen. 


Codierung zu Programm STRINGBLANKSI]: 


102 REM ======PROGRAMM STREINGELANES1 

112 FRINT "EINEN STEING MIT BLANCS ERWEITERN." 
126 INFUT "ANZAHL DER STELLEN INSGESAMT": A 
1354 INFUT "ZU ERMEITERNDER STRING ",3$ 
14a FOR I=1 TOR: LET B£=B$+" ": NERT I 

124 LET >#= LEFTSLSFHBS.MD 

1ed PRINT "--",58:"5--" 

ira PRINT "ENDE": END 


EINEN STRING MIT BLANCS ERWEITERN. 
ANZAHL DER STELLEN INSGESAMT? 28 

ZU ERWEITERNDER STRING? PLUS. 
-->PLUS.’4 am 

ENDE. 
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Das nachfolgende Programm BLANKSZEIGENI! verwendet die Funktion 
INSTR, um anzuzeigen, an welchen Stellen (Indices) in einem 
Text Blanks stehen. Dabei wird die Funktion INSTR mit drei Ar- 
gumenten programmiert: 


... INSTR(EIN$,CHR$(32) ,BEGINNSTELLE) 


String, in dem gesucht 
wird. 

Zeichen, das gesucht 
wird (CHR$(32)=Blank). 
Stelle in EIN$, ab der 
gesucht wird. 


Hat die Variable BEGINNSTELLE den Wert 1, wird im String EIN$ 
von der 1. Stelle an gesucht. Innerhalb der WHILE-Schleife 
wird SBEGINNSTELLE dann jeweils auf die nächste Stelle hinter 
dem gerade gefundenen Blank (also auf BLANKSTELLE+1) gesetzt. 


Codierung zu Programm BLANKSZEIGEN]!: 


16 REM ======PROGREAHMM ELANESZEIGEN] 

1168 PRINT "STELLEN UND AHZAHL “OH ELRHES IH EINEM TEAT." 
12a: 

130 REM ======YVEREINERFUNGSTEIL 

140 REM EINE: EINGABETEXT MIT ELAHES 

159 REM BEGINNSTELLE: HIER BEGINHT IMNSTR ZU SUCHEN 

158 REM ELAHNKSTELLE: HIER WURDE EIN BLANK GEFUNDEN 

1’ REN AHEAHL : AHZAHL DER GEFUNDENEN ELANES 


ü 
DR 
m 
ag 
! 
N 
! 
i 
N 
I 
OT 
NE 
m 
Eu | 
u 
5 
£r ji 
| 
m 
Eu | 
u 


PRINT "WELCHEN TEXT MIT ELRAHKS DURCHSUCHEN?" 
IHFUT EIN 

LET EEGINHSTELLE=1: LET AHEAHL=E 

LET ELAHESTELLE=INSTRECEINF, CHRFSE} 2 

FRINT: FEIHT "STELLEN MIT ELAHNES SIND: " 


DU WHILE ELAHESTELLEN 

FEIHT ELANFSTELLE: 

LET ANZAHL=ANZAHL +1 

LET BEGIHNHSTELLE=BLAHKSTELLE+I 

LET ELANKSTELLE=INSTREVEINE, CHR$U3Z>, BEGINNSTELLE? 
LÜCF 


FEINT:FRINT "ANZAHL DEF BLAHES:"; ANZAHL 
PEINT "ENDE.": EHD 


GI GI SO PIE RSTI PS PO OO Po fo Pin m 


Rio pie WDR ll 
Dr a a A 


Ausführung zu Programm BLANKSZEIGENI: 


STELLEH UHD AHZAHL YOH ELAHES IN EINEM TERT. 
HELCHEH TE=#T MIT BLAHES DURCHSUCHEN? 
DER SCHLAUE BUB UND DER DUMME COMPUTER 


STELLEN MIT EBLANKS SIND: 
4 1Z 16 20 24 38 
ANZAHL DER ELAHNES: © 


EHDE. 
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3.3.3 Datumsangaben verarbeiten 


Angaben zum Datum werden so oft verarbeitet, daß man fast von 
einem eigenen 'Datentyp' sprechen kann. Das folgende Programm 
DATUMGANZZAHL] bereitet ein Datum zum Sortieren auf: Das Ein- 
gabeformat 'Tag-Monat-Jahr' wird zum Format "Jahr-Monat-Tag' 
umgekehrt und könnte dann leicht (in eine ganze Zahl umgewan- 
delt) sortiert werden. 


Codierung und Ausführungen zu Programm DATUMGANZZAHLI1: 


106 REM ======PROGREAMM DATUMGAHZERHL1 

119 FEINT "DATUM ALS GAHNZZAHL ZWECKS SORTIEREN." 
124 INFUT "DATUM IM FORMAT TT.MM. IJ";D$ 

132 LET T#=LEFTFCD$.22 

1421 LET M$=MIDECD#,4,2> : LET J$=RIGHTFeD#, 2. 
115g LET DI$=I$ + M$ + T$ 

lea PRINT "GAHZZAHL "UMGEREHRT”: ";DIE 

ira PRINT "EHDE." : END 


DATUM ALS GANZZAHL ZWECKS SORTIEREN. 
DATUM IM FORMAT TT.MM.JJI? 12.06.44 
GAHZZAHL "UMGEKEHRT": d4aslz 

EHDE. 


DATUM ALS GANZERHL ZWECKS SORTIEREN. 
DATUM IM FORMAT TT.MM. IT? 21.01.47 
SAHZZAHL "UMGEKEHRT": 4r’aizl 

EHDE. 


3.3.4 Teilstrings aufbereiten 


Aus Gründen der Speicherplatzersparnis speichert man die Sätze 
einer Datei oft als Strings ab, wobei die Satzkomponenten z.B. 
durch das Zeichen ";'" voneinander getrennt werden. Programm 
ETIKETTENI demonstriert, wie aus dem String S$ die Teilstrings 
T$ zu einem Drucketikett aufbereitet werden. Das Beispiel be- 
zieht sich also auf eine Artikeldatei mit Sätzen (Strings S$), 
die aus jeweils 7 Datenfeldern (Teilstrings T$) bestehen. Die 
Abfrage in Zeile 280 vergleicht mit CHR$(59) und somit mit ";" 
(59 als Codezahl für das Semikolon im ASCII); man könnte eben- 
so schreiben: 280 IF (MID$(S$,I,1)=";'") OR ... 

Die WHILE-Schleife wird solange durchlaufen, bis NS=0 ist. 
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Codierung zu Programm ETIKETTEN!: 


18 REM ======FROGEAMM ETIKETTENI 

11& FRINT "TEILSTRINGS AUS EINEM STRING ENTNEHMEN" 
1268 PRINT "UND ALS DRUCKETIKETT AUSGEBEN. " 

130 : 

148 REM ======VEREINBARUNGSTEIL 

159 REM 5$: STRING CDATENSATZ MIT ; GETRENNTEN DATENFELDERN) 
160 FEM NS: INTEGER “LAENGE WON 5$> 

17a REM T$: STRING <TEILSTRING MIT EINEM DATENFELD> 
150 REM HT: INTEGER “LAENGE WON T$) 

190 

208 REM ======ANWEISLUNGSTEIL 

218 FRINT "STRING MIT ; ALS TRENNUNGSZEICHEN: " 

228 INFUT 5$ : LET NS=LEN(S$? 

230 PRINT : PRINT "AUSGABE ALS ETIKETT:" 


254 DU WHILE NSC>O | 
260 REM #%#TRENNUNGSZEICHEN ; SUCHE Nakkkalekaakaellakikslele 
278 FOR I=1 TO NS 

232 IF <MID$CS$, 1, 1=CHR$CSPY> OR CHS=1) THEN LET NT=I:I=NS 
29 NEXT I 

300 REM $%KTEILSTRING T$ ENTNEHMEN 
31@ LET T$=LEFT$CS$.NT-1) 

320 FRINT" 031% 

330 REM %%KGESAMTSTRING S$ LIND T$ KUERZEHASAARERSRNN 
2348 LET NS=NS-NT 

358 LET S$=RIGHT$GS$.NS) 

358 LOCP 

378 PRINT "ENDE." : END 


Ausführung zu Programm ETIKETTEN!I: 


TEILSTRINGS AUS EINEM STRING ENTNEHMEN 

UND ALS DREUCKETIKETT RUSGEBEN. 

STEING MIT ; ALS TRENNUNGSZEICHENH: 

2319; DISKETTE:S.29:55700:45 TFI:18 STK. 5343.50 DM; 


AUSGABE AL=> ETIKETT: 
231 
DISKETTE 
a Pape 
55’DD 
35 TPI 
14 STE. 
43.58 IM 
ENDE. 


Programm ETIKETTENI enthält folgende Ablaufstrukturen: 


- Abweisende Schleife (250 DO WHILE ... 360 LOOP) 
- Zählerschleife (270 FOR ... 290 NEXT) 
- Einseitige Auswahl (280 IF ...) 


Die WHILE-Schleife schachtelt die FOR-Schleife ein, und diese 
wiederum schachtelt die IF-Auswahl ein. 
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3.3.5 Stringvergleich mit Joker-Zeichen 


Das Programm JOKERI veranschaulicht vier grundlegende Möglich- 
keiten, einen String als Ordnungsbegriff mit je einem weiteren 
String als Suchbegriff zu vergleichen: 


1. Verwendet man als Joker das Zeichen "=" ,„ wird M=, MW= wie 
MWS= jeweils als 'gleich' mit MWST erkannt. "=" ersetzt also 
eine Zeichenfolge. Insbesondere bei längeren Strings spart man 
sich bei Verwendung des Jokers "=" viel Tipparbeit. 


2. Das Joker-Zeichen "?" ersetzt genau ein Einzelzeichen. MW?T 
wie auch M??T werden so als 'gleich' mit MWST erkannt. 


3. Der '"Gesamtvergleich' vergleicht beide Strings Zeichen für 
Zeichen in voller Länge. 


4. Der 'Teilvergleich' faßt den Suchbegriff als Teilmenge auf. 


Dieses Vergleichen vollzieht sich in einer WHILE-Schleife, die 
verlassen wird, sobald END eingegeben wurde. 


Ausführung zu Programm JOKER]: 


YIER ARTEH DES STRINGWERGLEICHES ZEIGEN. 
--> ZU FRUEFEHNDER ORDHUNGSBEGRIFF? MWST 
--> ERSTER SUCHBEGRIFF CBEW. EHD:T Mus 
WERGLEICH MIR TORER "=": Mu= IH MUST 
--; SLCHBEGEIFF CEZU. EHIST 
TEILYERGLEICH: LINKS IM MWST 

-——> SUCHBEGRIFF WBEU. END? N 

--> SUCHBEGRIFF CBZWU. ENDET 
TEILYERGLEICH: LINKS IN MWST 


WIER ARTEH DES STEINGYERGLEICHES ZEIGEN, 
--> ZU FRUEFEHDER OÖRDNLUNGSBEGEIFF? MWST 
--> ERSTER SUCHBEGEIFF BZW. EHND>? Mus 
vERGLEICH MIR JOKER "=": Mu= IN MUST 


-——; SUCHBEGRIFF CBZU. END>? MUFT? 
VERGLEICH MIT JOKER “7°: MW?7? GLEICH MUST 


--; SLCHBEGRIFF CBZU. END? MWFT 
VERGLEICH MIT JOKER 7”: MU?T GLEICH MUST 


--> SUCHBEGRIFF ©BZW. END)? Mu 
TEILYERGLEICH: MW LINKS IN MUST 


-——- + SUCHBEGRIFF ©BEWM. END>T MWST 
GESAMTYERGLEICH: MWST GLEICH MWST 
TEILYERGLEICH: MWST LINKS IH MWST 
VERGLEICH MIT JOKER 7°: MUST GLEICH MWST 


--> SUCHBEGRIFF <BZU. END>? =T 
VERGLEICH MIR JOKER “=: =T IN MWST 


--> SUCHBEGRIFF “BZW. END>? END 
ENDE. 
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Codierung zu Programm JOKERI1: 


al 
112 
120 
138 
144 
154 
164 
17 
130 
134 
2 
zie 
2 
3 
248 
Pa 
2b 
er 
od 
2a 
3a 
3la 
Zen 
2.3 
34 
Sol 
354 
3ra 
358 
334 
ea 
41a 
420 
430 
440 
4 
dee 
4’ 
48 


FRINT "VIER ARTEN DES STEINGWERGLEICHES ZEIGEN." 


FEM ======VEREINBARLUNGSTEIL 

REM O8: STEING CORDNUNGSBEGRIFF) 

REM 5$: STEIHG CSLUCHREGEIFF> 

REM NO: INTEGER “STELLEHNANZAHL YON OF: 
REM N5: INTEGER “STELLENANZAHL WON 5#% 
REM 5: INTEGER “STELLE BZU. MERKER) 


IHFUT "--> ZU FRUEFENDER ORDHUNGSBEGRIFF"; 0F: LET HÜ=SLEN.OF? 
IHFUT "--> ERSTER SUCHEEGFEIFF ÜBZU. END2", 5% 


Di WHILE SFX"END" 
LET NS=LEN.S$) 
LET 5=68 : REM STELLE 5UWIE FLAGGE 
IF 5$="@" THEN FRINT "ENDE." : END 
REM ### GESAMTVERGLEICH EEHREREEEREEF EEE 
LET SiIF=LEFTFESHEH" "HNO: 
IF 51$=0+ THEN >28 
GOTN 34 
FEINT "GESAMTYERGLEICH: "5%," GLEICH ",0$ 
REM ### TEILVYERGLEICH EEE IR 
IF 5$%>LEFT$C0#.H5,> THEN Zre 
FRINT "TEILYERGLEICH: ":5$#;" LINKS IN "508 
REM ### VERGLEICH MIT JOKER = EHEN 
FÜR I=1 TO NS 

IF "=" = MIDECS$, 1.15 THEH LET 5=I : LET I=HS 
HEAT I 
IF 5=8 THEHN 448 
IF LEFT£CS$.5-1> > LEFTFEOF.S5S-1> THEN dal 
FEIHT "VERGLEICH MIE TOkRER "=": ",5$5" IN "0% 
FEM ### VERGLEICH MIT TOEER 7 ERREEEEEEEEEEEEE 
LET S=1 : FEM 5 AL5 FLAGGE 
Für I=1 TO HNO 

IF "7" = MID$C5$#,1.1> THEN 450 

IF MIDELS$,T.1> SSMIDECOF,T.1> THEN LET 5=%9: LET I=NO 
HEAT I 
IF 5=6 THEN 318 


A PEINT "VERGLEICH MIT JOKER "7°: "7,55," GLEICH "508% 


IMFUT "--> SUCHBEGRIFF CBZU. ENIHN.SF 
LOCP 


FRINT "ENDE.": END 


Die FOR-Schleifen in den Zeilen 370 und 450 schachteln jeweils 
eine einseitige Auswahl ein, in welcher die Laufvariable I auf 
den Endwert NS bzw. NO hochgesetzt wird. Damit werden die bei- 
den Schleifen jeweils über die NEXT-Anweisung verlassen (Prin- 
zip: eine Schleife hat nur e in en Ausgang). 
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3.3.6 Verschlüsselung zwecks Datenschutz 


In Klartext gespeicherte Daten kann jeder lesen, verschlüssel- 
te Daten hingegen zumindest nicht so leicht. Die Kryptographie 
als Lehre von der Textverschlüsselung kennt drei wichtige Ver- 
fahren: 


- Umcodierung (z.B. Information im ASCII schreiben) 
- Versatz-Verfahren 
- Ersetzungs-Verfahren 


'Versatz' heißt, daß das jeweilige Alphabet versetzt und umge- 
stellt wird; ein Beispiel haben wir mit dem 'von hinten nach 
vorne schreiben' in TEXTUMKEHRENI (Abschnitt 3.3.2) schon be- 
handelt. Bei den Ersetzungs-Verfahren wird das zugrundeliegen- 
de Alphabet ersetzt; das Programm VERSCHLUESSELUNG zeigt ein 
einfaches auf Julius Cäsar zurückgehendes Verfahren. Wie geht 
man dabei vor? Jedes Zeichen des Klartextes E$ wird durch das 
S-te nachfolgende Zeichen ersetzt. Dabei geben die Codezah- 
len des ASCII die Reihenfolge vor. Die ASC-Funktion stellt uns 
mit dem Aufruf ASC(MID$(E$,I,1)) die Codezahl des I. Zeichens 
im Klartext E$ zur Verfügung; addieren wir S hinzu, so kommen 
wir zur Codezahl des verschlüsselten Zeichens. 

Bei der 1. Ausführung zu Programm VERSCHLUESSELUNG versetzen 
wir den Text COMMODORE PLUS/4 um 2 Zeichen: aus dem "C" wird 
ein "E", aus dem "O0" ein "o", usw.. 


Ausführung zu Programm VERSCHLUESSELUNG: 


TE#TYERSCHLUESSELUNG "ERSETZUNG CAESAR. 
EINGAEBETE*T? COMMODORE FLUS.’4 
SCHLUESSEL? 2 


1. "ERSCHLUESSELUNG: 
AUSGABETERXT: 
ERNOGFOTG"RHULLS 


2, EHTSCHLUESSELUNG: 
EIHGABETEAT JETZT: 
ERIÖIGFOTG"EHMLLE 
AUSGABETERT JETZT: 
COMMODORE FLUS.4 
ENTE, 


TEXTYERSCHLUESSELUNG “ERSETZUNG CAESAR”. 
EINGABETE#T? 12925654 DM BILANZEUMME 
SCHLUESSEL? 10 


1. YERSCHLUESSELLNG : 
AUSGABETEHT: 
ERFEEHUELSTERTTUND 


=, EHTSCHLUESSELUNG: 
EIHGABETERT JETZT: 
SZCEBFE EHLELSGYEI TUNG 
AUSGABETERT JETZT: 
225552 DM BILANZSUFME 
ENTE, 
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Codierung zu Programm VERSCHLUESSELUNG: 


106 
110 
126 
134 
148 
154 
160 
178 
154 
134 
2a 
21a 
228 
230 
240 
238 


308 
318 
1205 
1918 
igz2 


1839 LET H=RSC(MIDFIE$F, 1,13) 


1044 
10504 


FEN ======PROGRAMM VERSCHLUESSELUNG 
FEINT "TEXTYERSCHLUESSELUNG “ERSETZUNG CAESAR’. " 


REM ======VEREINBARLUNGSTEIL 

REM E$: STEING SEINGABETEAT? 

REM A$: STRING CAUSGABETEXT) 

REM 5: INTEGER «SCHLUESSEL ZUM ERSETZEN} 
REM H: INTEGER «ASCII-CODEZAHL} 


REM ======ANWEISUNGSTEIL 

INPUT "EINGRBETEAT"; E# 

INPUT "SCHLUESSEL"; $ 

PRINT: PRINT "1. YVERSCHLUESSELUNG: " 
GÜSUB 1808 : REM UPRO “ERSETZUNG “ 
FRINMT "AUSGABETEXT:" : FRINT A$ 

PRINT : PRINT "2. ENTSCHLUESSELUNG: " 
LET E$=A#$ : LET S=-5 

FRINT "EINGABETEAT JETZT:" : PEINT E$ 
GOSUB 1oaG : REM 2. AUFRUF YON UPRO ’ERSETZUNG“ 
PRINT "AUSGABETEXT JETZT:" : FRINT A$ 
PRINT "ENDE." : END 


REM #%#UNTERPROGRAMM “ERSETZUNG kkkskkeikikikiiiink 
LET As="" 
FOR I=1 TO LEN(E$) 


Lang 


+5 
IF H>127 THEN LET H=H-127 
IF H<8 THEN LET H=H+127 
LET A3=A$+CHRF CH) 
NEAT I 
RETURH 
REM #%#EHNDE LINTERFROGEAMMEEREREFEEEEEFFEFTERFFEEIIEE 


3.3.7 Ein Spiel zum Erraten von Text 


Im WORTSPIEL1I muß ein Wort erraten werden, von dem zuerst nur 


die 


Länge bekannt ist. Wird ein passendes Zeichen getippt, so 


setzt das Programın dieses Zeichen an die zugehörige Stelle. 


Die 


bei der Ausführung zum Programm WORTSPIELI untereinander- 


stehenden Buchstaben E,B,A,R,I ... wurden über Tastatur einge- 
tippt. COMMODORE 16 als zu erratendes Wort haben wir der Ein- 
fachheit halber eingetippt. Man könne es z.B. in einer Datei 
zusammen mit weiteren Worten speichern und zufällig auswählen. 
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Zur Codierung von WORTSPIEL]: 

Das Spiel wird durch eine WHILE-Schleife (Zeilen 260-370) ge- 
steuert. Diese Schleife wird verlassen, sobald A$=W$ ist, d.h. 
sobald der Ausgabestring (A$) mit dem zu erratenden Wort W$ 
übereinstimmt. 

Die Zählerschleife in 230 baut einen Ausgabestring A$ auf mit 
zunächst ausschließlich nur Sternchen. In 290 wird eine Einga- 
be (e i n Zeichen) für E$ erwartet. Je nach Übereinstimmung 
dieses Zeichens mit dem ersten, dem letzten oder einem sonsti- 
gen Zeichen im Ratewort W$ wird das erste Sternchen (in Zeile 
330), das letzte Sternchen (in 340) oder ein mittleres Stern- 
chen (in 350) vom Ausgabetext A$ durch E$ ersetzt, d.h. E$ mit 
A$ neu verkettet. 

Anstelle von INPUT könnte man auch eine Warteschleife mit GET 
programmieren. 

Das Programm WORTSPIELI umfaßt eine abweisende Schleife (mit 
WHILE), die eine Zählerschleife (mit FOR) einschachtelt. In 
dieser Zählerschleife wiederum ist eine mehrseitige Auswahl- 
struktur (mit IF) ebenfalls geschachtelt angeordnet. 


Codierung zu Programm WORTSPIEL]1: 


122 REM ======FROGEAMM WORTSPIELI 

11& PRINT "ZEICHEN EINES WORTES ERRATEN." 
120 : 

139 REM ======YVEREINBARUNGSTEIL 


148 REM W$: ZU ERRATENDES WORT 
159 REM LM: LARENGE “WON W$ 
160 REM E$: EINGEGEBENES RATEZEICHEN 


ia REM VW: WERSUCHSZAREHLER 
138 
1360 REM ======FANWEISUNGSTEIL 


206 PRINT "WELCHES WORT ERREATEN?": INFUT W$ 
zig LET LW=LENCHE> 


220 LET A$="" : LET Y=8 

238 FOR I=1 TO LW: LET AtsA$+"%": NEXT I 

240 SCNELR: PRINT "NUN EINZELZEICHEN TIPPEN!" : PRINT 
fie 


263 DO WHILE AETIU$ 

270 PRINT RS" "; 
230 IF At=U$ THEN 330 
230 INFUT E$ 

sad LET 1 at] 

318 FOR I=1 TO LM 


3ER IF MID&CW$,I,1><ZEF THEN 360 

330 IF I=1 THEN LET A$=E$+RIGHTSCH$,LW-1): GOTO 368 
340 IF I=LWM THEN LET A$=LEFT$CA$, I-1>+E$ : GOTO 368 
350 LET A$=LEFT$CA$,I-1) + E$ + RIGHTFCAF,LW-ID 

368  MNEAT I 

3ra LÜOP 


338 PRINT W$: PRINT 
334 PRINT "SPIELENDE NACH" WG; "VERSUCHEN. " 
486 END 
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Zwei Ausführungen zu Programm WORTSPIELI: 


ZEICHEN EINES WORTES ERREATEN,. ZEICHEN EINES WORTES ERRATEN,. 

HELCHES WORT ERRATEN?T HELCHES WORT ERRATEN? 

PLUS,’ COMMÖDOREIE 

HUHN EINZELZEICHEN TIPFEH: HUH EINZELZEICHEN TIFPEN: 

nd 2 2 5 2 u KERN | 0 

LEHE 5 FÜFROFOKEEE — M 

KL#54#  E +OMMOROREEE — D 

LIE 3 4 +OMMOTORERE A 

BE 227. 2 *#UMMODOEEEE 6 

#LUS44 U OMMODORFHE, 

#LLUSE4 7 +OMMODOREKE FF 

#_115.’4 P »OMMODORE#E FF 

FLLUS’4 *OMMODORHEE 
COMMODORKEE 1 

SPIELENDE NACH 8 VERSUCHEN. COMMODORE  — E 
COMMODOREHE 1 
COMMODOREIE 


SFIELENDE HACH 12 VERSUCHEN, 


3.4 Bildschirmausgabe und Druckausgabe 


3.4.1 Steuerung des Cursors am Bildschirm 


Programm CURSORPOSITIONI zeigt, wie der Cursor als blinkendes 
Zeichen am Bildschirm frei positioniert werden kann. Das Aus- 
führungsbeispiel positioniert das Zeichen "+" win Zeile 2 und 
Spalte 37. 


Codierung zu Programm CURSORPOSITION]I: 


REM ======FROÖGRAMM CURSÖRFOSITIONI 
PRIHT "CURSOR LEBER STEUERZEICHEN FOSITIONIEREN." 


REM ======VEREINBARLUNGSTEIL 

LET CUE=CHR$E17H: REM CURSOR NACH UNTEN 

LET CR$SCHREC23H: REM CURSÖR NACH RECHTS 

FOR I=1 TO 6 : REM STEINGS FUER CURSORSCHRITTE 
LET CU$=CU8+CUE : LET CRFSCR$HÜR$ 


PIPSPI RO PRINT m m pi de eb ee je 
ER N En EN Ta Er EEE RE LE En En 
ZIG IMEDO DD 


HEAT I 

REM ======AHWETSUNGSTEIL 

INFUT "ZEILE “A-24 ÜBEN -> UNTEN? "ı & 
INFUT "SPALTE 48-33 LINKS -> RECHTS" O5 
SCHELR : REM EILDSCHIRM LOESCHEN 
FEIHT LEFTEFCCUF, ZI: LEFTEUCH$ 553 +" 

END 
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Bei einer Unterteilung des Bildschirms in 25 waagerechte Zei- 
len und 40 senkrechte Spalten kann dieser maximal 1000 Zeichen 


darstellen. Dementsprechend gibt es 1000 verschiedene Cursor- 
positionen. 


Die Zeilen werden von 00 01 02 03 ee 37 38 39 
0 bis 24 und die Spal- 01 

ten von 0 bis 39 ge- 02 + 

zählt. 

Den Cursor können wir Cursorposition: 

durch Steuerzeichen an Zeile 2, Spalte 37 


jede beliebige Position 
bringen. 





Druckbare und nicht-druckbare Zeichen: 

Es gibt druckbare Zeichen und solche Zeichen, die eine ganz 
bestimmte Funktion zur Steuerung eines Ausgabegerätes auslösen 
(Zeichen CHR$(13) mit ASCII-Codezahl 13 löst RETURN aus), oder 
der internen Kontrolle dienen (vgl. Abschnitt 2.1.4). 


Druceckbazr e ze ichen 


Ziffer, Buchstabe, Sonderzeichen: Grafik-Zeichen: 
zZ.B. CHR$(77) für Buchstabe M z.B: CHR$(151) für grau 
CHR$(63) für Fragezeichen CHR$(149) für braun 
CHR$(32) für Leerstelle CHR$(129) für orange 
1, Den SE a | PR ee 6 Be ne ER N ac Sr = zeichen 
Cursor- Drucker- Sonst. Ausgabesteuerung, 
steuerung: steuerung: Musik,interne Kontrolle: 
CHR$(19) Home abhängig CHR$(142) Großbuchst. 
CHR$(17) Cursor runter vom CHR$(14) Kleinbuch- 
CHR$(145) Cursor hoch jeweiligen stabe um- 
CHR$(29) Cursor rechts Drucker schalten 


Druckbare Zeichen und Steuerzeichen mit Beispielen 


Jedem Steuerzeichen ist im ASCII-Code eine Zahl zugeordnet. 
Durch die Anweisung PRINT CHR$(Codezahl) können wir ein be- 
stimmtes Steuerzeichen absenden bzw. "ausgeben'. Geben wir an 
der Tastatur PRINT CHR$(19) ein, wird der Cursor in die obe- 
re linke Bildschirmecke gebracht. Mit PRINT CHR$(147) können 
wir zusätzlich noch den Bildschirm löschen. 


Nun zu Programm CURSORPOSITIONI im einzelnen: 

140 LET CU$=CHR$(17) weist das Steuerzeichen "Cursor um eine 
Stelle nach unten' der Variablen CU$ zu. Wir können nun ver- 
einfacht durch PRINT CU$ vom Programm aus den Cursor um eine 
Stellen nach unten rücken. Entsprechend wird das Steuerzeichen 
CR$ (Cursor um eine Stelle nach rechts) vereinbart. 
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PRINT CR$;CR$;CR$;CR$; rückt den Cursor um vier Stellen nach 
rechts. Da dieses Vorgehen sehr umständlich ist, verketten wir 
in Zeile 170 die Variable CR$ zu einem 64-Zeichen-String. Mit 
PRINT LEFT$(CR$,4); bringen wir jetzt den Cursor um vier Stel- 
len und mit PRINT LEFT$(CR$,37); um 37 Stellen nach rechts. 
"„“ am Ende der PRINT-Anweisung unterdrückt den anschließenden 
Wagenrücklauf bzw. RETURN: der Cursor verbleibt an der Posi- 
tion 37. 

Die FOR-NEXT-Schleife hat die Aufgabe, die Strings CU$ und CR$ 
zur Cursorsteuerung aufzubauen. Die Strings erhalten dabei 64 
Steuerzeichen CHR$(17) bzw. CHR$(29): beim 1. Schleifendurch- 
lauf 2 Zeichen, beim 2. Durchlauf 4, beim 3. Durchlauf 8, .... 
Für eine Bildschirmbreite von 40 Zeichen genügt dies. 

Die Anweisung SCNCLR löscht den Bildschirm und bringt den Cur- 
sor in die 'Home-Position' links oben. SCNCLR (SCreen CLeaR) 
bewirkt dasselbe wie PRINT CHR$(147) . 


Die Zeichen zur Cursorsteuerung sind in gewissem Sinne auch 
'druckbar', da sie als Grafikzeichen erscheinen. Darauf gehen 
gehen wir in Abschnitt 3.4.5 (Druckersteuerung) ein. 


3.4.2 Ausgabezeile mit PRINT 


Programm DEMO-PRINTI demonstriert die Wirkung der Trennungs- 
zeichen "," und ";" sowie der Funktionen TAB (Tabulator) und 
SPC (Space, Leerschritt) auf die am Bildschirm gerade ausgege- 
bene Zeile. 

Das ";" bewirkt eine Ausgabe auf der nächsten Zeilenposition, 
während das "," eine 10-spaltige Ausgabe vornimmt und zur Po- 
sition 1, 11, 21 bzw. 31 vorrückt. 

Die Zahl 196.25 wird in Zeile 160 'erst' in Position 18 ausge- 
geben, da in Position 17 die Vorzeichenstelle steht (unsicht- 
bar, da positiv). 

Die PRINT-Anweisungen in den Zeilen 150 und 220 dienen dem An- 
zeigen der Druckposition der Ausgabestrings PLUS/4 und des nu- 
merischen Wertes 196.25. 


Codierung und Ausführung zu Programm DEMO-PRINT1: 


186 REM ======PROGRANM DEMÖ-PRINTI 

114 SCHELR 

120 FRINT "DEMONSTRATION ZUR ZEILENWEISEN AUSGABE MIT FRINT." 
135 INFUT "ZAHL EINTIPFEN";R 

148 IHFUT "TEXT EINTIFFEN"; FR$ 

158 PRINT "1234567390123459€78901234567590123456 7530" 
1508 PRINT R$. FR 

178 FRINT R$,.E 

130 PRINT R$R 

134 FRINT R$," "FR 

zes FRINT TAB(S:: REF; TABCZO:: R 

218 PRINT SPC<S>, RS, SPEER: FR 

220 PRINT "12345675201234567530123456753301234296 7330" 
sd END 
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DEMONSTRATION ZUR ZEILENWEISEN AUSGABE MIT FRINT. 
ZAHL EIHTIFFEN? 1396.25 

TE#T EINTIFPEN? FLUS.’4 
1234567399123456723912345675901234567330 

PLUS’4 125.29 

PL1S.’4 196.25 

PLUS.’4 196.25 

FLUS”4 196.25 


FLUS/4 196.25 
FLUS.’4 196,25 
12345673791 2349679701224967530123456 7570 


3.4.3 Verwendung des Füllstrings 


Mit einem Füllstring können wir die Druckzeile mit Leerstellen 
bzw. Blanks auf eine gewünschte Länge bringen. Bei der Ausfüh- 
rung zu Programm FUELLSTRINGI hat die Zeile 30 Zeichen. In der 
Programmzeile 160 wird ein Füllstring B$ mit Länge R aufge- 
baut, der mit T1$ und T2$ auf 30 Stellen Länge verkettet wird. 


Codierung zu Programm FUELLSTRINGI: 


186 REM ======PFROGERAMM FUÜELLSTEINGI 

118 PRINT "TEXT DURCH VERWENDUNG EINES FUELLSTREINGS" 
128 PRIHT "RECHTEBUENDIG FORMATIEREN, " 
134 INFUT "1. TESTZEILE": T1$ 

142 IMFUT "zZ. TEATZEILE": T2$ 

156 IMPUT "STELLE BEGRENZUNG RECHTS"; 

154 FOR I=1 TOR: LET B$=E$+" ": NERT I 
178 LET TiF=RIGHTFÜB$+T1$.F) 

154 LET T2$=RIGHTFLBEHT2$, FE: 

134 PRINT T1$ : FRINT T2$ 

zaa FRIHT "ENDE." : END 


Ausführung zu Programm FUELLSTRINGI: 


TE#T DUFECH VERWENDUNG EINES FÜUELLSTRINGS 
RECHTEELIENDIG FORMATIEREN. 
1. TE#TZEILE? COMMODORE PLUS.’4 
&. TE#TZEILE? GANZ NEU 
STELLE BEGREHZUNG RECHTS? 34 

COMMODORE FLUS.4 

GANZ HEU 

ENTE. 
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3.4.4 Ausgabe runden 


Der Kaufmann fordert eine gerundete und formatierte Zahlenaus- 
gabe. Das Runden einer Zahl Z auf S Dezimalstellen genau kann 
in einer Anweisung als 

100 LET Z = (z*10%5+0.5)/(10#5) (auf S Stellen runden) 


geschrieben werden (10#s für '10 hoch S'). Daraus erhalten wir 
für das Runden auf 2 Stellen: 


100 LET Z = (2%*%100+0.5)/100 (auf 2 Stellen runden) 


Programm RUNDENZAHLI löst den Rundungsablauf in vier Einzel- 
schritte auf und gibt diese zur Veranschaulichung aus. 


Codierung zu Programm RUNDENZAHL]: 


180 REM ======PROGRAMM RUNDENZAHL1 
11@ FRINT "EINE ZAHL ZUR TRUCKAUSGABE RUNDEN." 


1258 INPUT "ZU RUNDENDE ZAHL": © 
138 IHFUT "KOMMASTELLEN "5 
149 LET Z =Z#1015 : FEIMT Z 
158 LET Z = Z+4.5 : FRINT Z 
166 LET Z = INT<GZ? : PRINT Z 
178 LET Z = Zif1815> : FEINT Z 


188 PRINT "ENDE." : END 


Ausführung zu Programm RUNDENZAHL!: 


EINE ZAHL ZUR DRUCKRUSGABE FUNDEN. 
ZU RUNDENDE ZAHL? 23.745 
KOMMASTELLEN? £ 

2374.39 

a3rn 

2375 

23.9 
EHDE [) 


Das Programm KOMMERZZAHL1 stellt Zahlen als Übersicht formge- 
recht untereinander, ergänzt fehlende Dezimalstellen, ersetzt 
Dezimalpunkte durch Kommata und setzt 1000er-Punkte. 

Zur Umformung wird die Zahl Z in einen String 2$ umgewandelt. 


EINE ZAHL EIS ZU 7 WORKOMMASTELLEN 
ZUE KOMMERZIELLEN AUSGABE AUFBEREITEN. 
BELIEEIGE ZAHL? 21250605 

ZAHL AUFEEREITET: 6.125.005. 600 


EINE ZAHL EIS ZU 7 YOREOMMASTELLEN 
ZUR KOMMERZIELLEN AUSGAFBE AUFBEREITEH. 
BELIERIGE ZAHL? 109238. 4 

ZRHL AUFBEREITET: 198.239,40 
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Codierung zu Programm KOMMERZZAHL]: 


152 REM ======PROGERAMM KOMMERZZAHLI 

118 PRINT "EINE ZAHL BIS ZU 7 YORKOMMASTELLEN" 

120 FRINT "ZUR KOMMERZIELLEN AUSGABE AUFBEREITEN." 
130 : 

14a INPUT "BELIEBIGE ZAHL": 2 : LET Z$=5TR$lZ2> : LET N=LENCZF: 
158 IF LENCSTR$CINTEZIHPPS THEN PEINT "MAXIMAL 7 YORKOMMASTELLEN" 
169 REM ##% NACHKOMMA-NULLEH ANFUEGEN FERIEN GOTO 148 
ira IF MIDSCZS,N-1,1>="." THEN LET Zt=Z$+"0": GOTO Za0 
188 IF MIDFLZF,N-2.15<>"." THEN LET Z#$=2$+",08" 

138 REM ### AUF LAENGE 7+3=18 ERINGEN EREIHHHEH 

200 LET Z$=RIGHTF$E" "+2$,109) 

2la REM ### DEZIMALFUNKT DURCH KOMMA ERSETZEN #E88# 

ze LET Z$=LEFTSCZE, 724", "+RIGHT$SCZ$, 2) 

230 REM #%%# TALSENDER-FLUNKTE SETZEN BRaskhkticklikie 

248 IF Z>=laag THEN LET Z$=LEFTECS$,40+","+RIGHT$CZ$,6) 
es0 IF 27=1800008 THEN LET Z$=LEFT$CZE, 134". "+RIGHTFCZ$, 
268 FRINT "ZAHL AUFBEREITET: ",2$ 

erß END 


10) 


3.4.5 Ausgabeformatierung mit PRINT USING 


Das Programm DEMO-USING1I demonstriert die Möglichkeiten, die 
Ausgabe durch einen Formats t ring (auch als Maske 
bezeichnet) in der PRINT USTNG-Anweisung zu ordnen. 


100 


11a SCNCLR 


120 
130 


JG Gil 


GUIDO 
RE A 


PRINT 
PRIHT 
FRINT 
PRIHT 
FEINT 
FRINT 
PRIHT 
PRINT 


a FRINT 


PRINT 
FRINT 
FEINT 
FEINT 
FEINT 
FRINT 


PRINT: 


PEINT 


A PRINT 


FRIHT 
FRINT 


FEIMT: 
A LET MtS"RR. HH m 


"DEMONSTRATION ZUR AUSGABE-FORMATIERUNG. " 
"1. EINE ZAHL AUSGEBEN: " 
USING "HHHR",; 12 

USING "RRRE", 123 

LISING "SRH", 125 

ISING "+HR#"; 123 

ISINHG "BAHR"; -123 

LISING "-HH#": 123 

USING "HH": -123 

USING "RHRR"; -1234 
USING "RHH#", 10602. SE 
USING "HH", 12345 
LISING "HERR.##": 759.45 
USING "HHH.4#", -043. 745 
USING "HRRHHR HU HR 


FEINT "&. MEHRERE ZAHLEN AUSGEBEN: " 
USING "HRH. HE"; 222.5: 10, 432.571; 

USING "HRR.HH N" 222.0. 432.071, 
ISIN '# 4 BR OH: Farıran 
LISING "HHHH.4# DM FÜER #44 Ki": 237, 


FRIHT "2. YRRIRELEH VERWENDEN: " 
RABATT AR ### STUECK" 


(# reserviert eine Stelle) 


12345, -12.44 
2345. -1£. 44 


er 218 


LET FE=Zu:LET M=456 


FRIHT 
FEIHT 
FEIHNT 
FEINT 


he 


USING M$; 5.125. 18 
USING M$: R,M 
LISING M$: R.M#Z 


LISING M$+" JETZT"; R.Mkz 
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Codierung zu Programm DEMO-USINGI (Fortsetzung): 


418 PRINT: FRINT"4. STRINGS AUSGEBEH: " 

424 PEINT USING "ESSH#s#4H#=BITTE"; "FRANGS" 

434 PRINT USING "ESSHhhhht=BITTE"; "DM" 

44A PRINT USING "ZSSHhHh4#=EITTE"; "DEUTSCHE MARK" 
459 PRINT USING "25 ####># BITTE"; "IM" 

454 PRINT USING "25 HH BITTE"; "DM" 

478 FRINT USING "25 ####5# BITTE"; "DEUTSCHE MARK" 
450 FRINT USING "HRRHR", "Im". "FRANGS" 


438 FRINT: FRINT "5. ZAHLEN UND STRINGS: " (= zentriert) 
San LET Mi$="#8#.8# #H8# GLEICH HH. HH HH" ustiert 
519 PRINT USING Mi$; 138, "LIRE".9.3, "DM" (> justiert) 


328 FRINT USING MiF, 1,"DM",138,"LIRE" 
330 FRINT USING "#HRHR", 10."DM".M,"LIRE" 
42 PEINT "ENDE.": EHD 


DEMÜHSTRATION ZUR AUSGABE-FÜRMATIERUNG. 
1. EINE ZAHL AUSGEBEN: 
12 
123 
$123 
122 Ausführung zu Programm DEMO-USINGI 
id 
123 
-123 
*rEH 
15051 
% 
734.45 
-543. 79 
1.234,367.39 


2. MEHRERE ZAHLEH AUSGEREN: 

222.58 19. 00432. 37 EHER 12.44 
222.50 10.89 432.57 WER 12.44 
f vv. vr. " 

837,52 DM FÜER 210 KG 


3. VARIRELEN YERWENDEH: 

S.125 % RABATT AR 18 STUECH 
za.0020 = RRERTT AB 4a STUECK 
20.004 % RABATT AB Faa STUECK 

en.aBa = ERBATT AB Fan STUECE JETZT 


4 STEINGS AUSGEBEH: 
ne FEAHLS EITTE 
25 DM BITTE 
ZSDELTSCHEBITTE 


es om EITTE 
fr) br BITTE 
25 DEUTSC EITTE 
IM  FERHG 


5. ZAHLEN UNI STEINGS: 

154.50 LIFE GLEICH 8.29 IM 
1.20 IM GLEICH 159.00 LIEE 
jabM  SS5ELIEE 

ENDE. 
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3.4.6 Druckausgabe 


3.4.6.1 Gesamte Ausgabe auf den Drucker leiten 


Die CMD-Anweisung leitet alle Ausgaben des Commodore vom Bild- 
schirm zum Drucker um. Wir geben im direkten Dialog ein: 


OPEN 1,4 J/RET/ Kanal 1 zum Gerät 4 (Drucker) Öffnen 
CMD 1 /RET/ Alle Daten über Kanal 1 zum Drucker 


Damit werden alle nachfolgend getippten Daten auf dem Drucker 
ausgegeben. Mit der Befehlsfolge 


OPEN 1,4: CMD 1: /RET/ 
LIST /RET/ 


PRINT#1 /RET/ 
CLOSE 1 


wird das gerade im RAM befindliche Programm auf dem Drucker 
aufgelistet. Vor dem Schließen von Kanal 1 (als sog. logischer 
Datei 1) muß zumindest ein PRINT#1 gesendet werden. 

Für die Informationsverbindung zwischen Commodore und Druk- 
ker haben wir die Kanalnummer 1 gewählt. Ebenso können wir ei- 
ne andere Nummer 1,2,...,14 wählen. 


Die Anweisung CMD kann auch innerhalb eines Programmes stehen. 
So gibt z.B. das Programm 


100 OPEN 2,4 : CMD 2 
110 PRINT "DRUCK" 
120 PRINT #2 : CLOSE 2 


bei Eintippen von RUN das eine Wort DRUCK auf dem Drucker aus. 
Die Direktanweisung 


OPEN 1,4: PRINT#1,"DRUCK": CLOSE 2 


gibt ebenfalls das Wort DRUCK aus. 


3.4.6.2 Einzelne Zeilen ausdrucken 


Die Anweisung CMD übergibt a 1 1 e Daten an den Drucker, die 
Anweisung PRINT# hingegen jeweils nur e i ne Ausgabezeile. 
Das Programm 


100 OPEN 1,4 

110 PRINT#1 "COMMODORE 16" 
120 PRINT#]1 

130 PRINT#1,"HAT 64K RAM" 
140 CLOSE 1 

150 END 
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gibt zwei Druckzeilen getrennt von einer Leerzeile aus. Die 
PRINT#1-Anweisung sendet die Ausgabe über den Kanal 1, der zu- 
vor als Informationsverbindung zum Drucker (=Gerätenummer 4) 
eröffnet wurde. 


Ersetzen wir die Anweisung 100 OPEN 1,4 durch 100 OPEN 1,3, 
dann wird die Ausgabe auf dem Bildschirm (=Gerätenummer 3) er- 
scheinen. Auf diese Art können wir Programme, die Druckausga- 
ben aufweisen, zunächst am Bildschirm testen. 


3.4.6.3 Steuerung des Druckers 


Das Programm DRUCKERI demonstriert die folgenden drei Probleme 
der Druckersteuerung: 

- Wörter direkt drucken 

- Grafik- und Text-Zeichensatz drucken 

- Schriftarten ärucken 


Zu 'Wörter direkt drucken' über Menüwahl 1: 

Diese Möglichkeit ist im Unterprogramm mit den 1000er Zeilen 
dargestellt. In einer DO-LOOP-EXIT-Schleife wird durch die An- 
weisung 1040 PRINT#1,DR$ jeder zuvor in die Stringvariable 
DR$ eingetippte Text (bis /RETURN/) ausgedruckt. Soll zeichen- 
weise anstatt wortweise gedruckt werden, muß die Eingabeanwei- 
sung GET anstelle von INPUT verwendet werden. 


Zu '"Zeichensätze ausdrucken' über Menüwahl 2: 

Geben wir über das Menü von Programm DRUCKER] die Wahl 2 ein, 
müssen zunächst die Steuervariablen GERAET und ADRESSE festge- 
legt werden. Diese bewirken dann in der OPEN-Anweisung dies: 


2060 OPEN 1,GERAET,ADRESSE 
Kanal 1 zur Datenübertragung. 


Gerätenummer 3=Bildschirm und 
4=Drucker. 


Sekundäradresse 0=Grafik-Modus 
und 7=Text-Modus. 


Wie die Ausführung zu Programm DRUCKER! zeigt, wird bei Ein- 
gabe von GERAET=4 und ADRESSE=0 der ASCII-Zeichensatz für den 
Grafik - Modus _(Grafikzeichen/Großbuchstaben) in 
Form einer Tabelle ausgedruckt. Hier zwei Beispiele zu den 
insgesamt 16*16=256 möglichen Zeichen: 


- Das Zeichen "0" steht in der Spalte 3 ganz oben. Es hat die 
ASCII-Codezahl 48: CHR$(48) ergibt "0" (Spalte 0 ganz oben 
mit CHR$(0O), Spalte 0 ganz unten mit CHR(15), Spalte 1 ganz 
oben mit CHR$(16), Spalte 2 ganz oben mit CHR$(32), usw.). 


- Das Grafikzeichen "schwarzes Herz" in Spalte 7/Zeile 3 hat 
dementsprecnend die ASCII-Codezahl 115. 
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PRINT "a - BEENDEN" 


14 FEINT "i - WOERTER DIFEKT DEUCKEH" 


IN me m m 
TE u a ae 
a 


ITIN 


Zu 


24 
2ns0 
r43]21% 
eur 
An P=15) 
aa 
z1208 


TAG 


ei 


PRIHT "Z — ZEICHEHNSRETZE GERAFIE UND TEST" 
FRINMT "3 - SPERRSCHRIFT UND REVERSE SCHRIFT" 
IMPUT "WURAHL a2": 1 

IF I=6 THEH EAIT 


OHM I GOSUE 1Add. Zuea, Soae 


IHFUT "WEITER": WE: SCHELR 


LOOP 
PRINT "ENDE.": EHI 


A FRIHT "WÜERTER DIREKT DRUCKEN BIS ZU "EHDT:" 
4 OFEN 1.4 
a do 


IHFUT Ire#: IF DE$="END" THEM ERIT 
FREINT#1,IDF3$ 
LOAP 


a „LOSE 1 : RETUÜRM 


PRINT "ZEICHENSRETEE. " 
PEIHT „ZEICHEN MODUS CR=GRAFIE, F=TEAT:7" 
INPUT ADFESS 
IF ADRESSE=G THEH LET MODLSF="GERAFIE": 
ELSE LET MODUSF="TERAT" 
PREIHT "GEFRRETEHUMMER ©S3=MOHITOR, 4=DRUCKERST" 
INPUT GEFRET 
FEN 1,GEFRET, ADRESSE 
PRINT#1,"ASCII-ZEICHEHSATZ FÜER ",MODUSF; "MODS": PRIMT# 
FOR 5P=1 TO 16 
FRIHMT#1., MID "OL 2345 F3SHRBEDEF" SP, 125" 0" 
HEX#T 5P : FRINT#1 
FOR ZE=1 TO 16 
FÜR SF=CZE-1> TO 255 STEF 16 
IF 5F£32 THEN LET DEUCK=E 
IF SF>127 AHO SPX168 THEN LET DEUCK=E 
IF DEUCE THEH FRINT#1.CHREFUSPIS" "GE 
ELSE PRINT#1." "; 
LET DRUCH=-1 
HE#T 5F 
FEINT#1 
HET ZE 
CLOSE 1 
FETLFH 


FEIHT "WELCHEN TE#T DEUCHEHN?" 

IMPUT EINE 

NFEH 1,4: CMD1 

FEIHT "SPERE: 2 "SCHRFII4OSEINFSCHR$CISH 
PREIHT "REWERS: ":CHR$C1S2SEINFSCHRFUIdEN 
PEIHT "HÜORMAL: ";EIN$ 

FRIHT#1 


1 CLOSE 1 
4 RETURH 
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Legen wir GERAET=4 und ADRESSE=7 fest, wird die Zeichensatz- 
Tabelle für den Text - Modus ausgegeben (Buchsta- 
ben in Groß- und Kleinschreibung). 


Ohne nähere Angabe gibt der Drucker stets im Grafik-Modus aus 
(SekundärADRESSE=0). Soll im Text-Modus gedruckt werden, müs- 
sen wir als Benutzer die SekundärADRESSE=7 angeben. 


zu "Schriftarten drucken' über Menüwahl 3: 

Die Schriftarten sind von Drucker zu Drucker verschieden. Die 
zugehörigen Kontrollcodes müssen dem jeweiligen Drucker-Hand- 
buch entnommen werden. Über die Menüwahl 3 (Unterprogramm mit 
den 3000er Zeilen) von Programm DRUCKER1I wird in Sperrschrift 
und reverser Schrift gedruckt, wobei sich die Kontrollcodes 
auf den Commodore-Drucker MPS-801 beziehen. Diese Kontroll- 
codes bzw. Steuerzeichen übermitteln wir über die Anweisung 
PRINT CHR$(...) an den Drucker. Diese Codes können wir natür- 
lich auch direkt übermitteln. Die Anweisung 


OPEN 9,4: PRINT#9,CHR$(14) ,"PLUS/4": CLOSE 9 


z.B. druckt das Wort PLUS/4 gesperrt aus. Statt Kanal 1 haben 
wir dabei den Kanal 9 zur Datenübertragung gewählt. 


Ausführung zu Programm DRUCKERI (Menüwahl 1): 


ANWENDUNGEN ZUR DRUCKERSTEUERUNG. 

a4 — BEENDEN 

1 - WOERTER DIREKT DRUCKEN 

& - ZEICHENSRETZE GRAFIK UND TEAT 

3 - SPERRSCHRIFT UND REVERSE SCHRIFT 
HAHL 9-37 1 

WOERTER DIREKT DEUCKEN EIS ZU “END”: 
BASIC-WEGWEISER 

FÜUER 

GOMMODORE 16 

SOWIE 1165 UND FLUS’4 


Ausführung zu Programm DRUCKER! (Menüwahl 3): 


ANWENDUNGEN ZUR DEUCKERSTEUERLNG. 

3 — BEENDEN 

1 - WOERTER DIFERT DRÜCKEN 

& — ZEICHENSRETZE GERFIK UND TEAT 

3 - 5SPERRSCHREIFT UND REVERSE SCHRIFT 
WAHL 8-37 3 

WELCHEN TE#T DEUCKEN? 

EOMMODORE PLUS.4 


SFEER' COMMODORE FLU=..4 
REYERS: Die 
HÖRMAL: COMMODORE FLUS,4 
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ANWEHDIUNGEN ZUR DRUCKERSTEUERUNG. Ausführung zu Programm 
9 - BEENDEN DRUCKER1 (Menüwahl 2): 


1 - WÜERTEF DIREKT DRUCKEN 
€ - ZEICHENSRETZE GRAFIK UND TEAT 


SFPERESCHRIFT UND REVERSE SCHRIFT - Jeweils 16 Zeilen 

HAHL M-37 2 (0-F) und 16 Spalten 
ZEICHENSAETZE. (0-F). 

ZEICHEN-MODUS CB=GRAFIK, 7=TEAT!? 

12) - Spalte 0: 
GERRETEHNUMMER ©3=MONITOR. 4=DRUCKER>? CHR$(0)-CHR$(14) 

4 Spalte 1: 
ASCII-ZEICHENSATZ FÜUER GEAFIE-MODUS: CHR$(15)-CHR$ (31) 


Spalte 2 oben: 


k1ı123456 7/59 ABCDEF CHR$(32) für Blank 
numaPp — 7 r- 7 r Spalte 2/Zeile 1: 

ıırv 908 Tau + CHR$(33) für "ı" 
"2ER|I at |. mr Spalte 5/Zeile 1): 
#3050% FIT 4 CHR$(81) für "gQ" 
g40 T”1 „ii | (33+3%16 ergibt 81) 
„"SsEUT”r I1 7.11 
EEE FV-% =Z1-x5& 1 - Grafik-Zeichen in 
“/GWÄUlıao II 17 Spalten 6 und 7 
vr S5Hn I# ee” stimmen überein mit 
3 Ir. ran If Spalten 12 und 13 
*:)]Z "% IJ"+ 1IJ 
+, KL’ + Fa’ +} 
 % LELE ı "Li." 
-=:MN)] | Je | ıbd 
. NT /rn "11a" 
"?’0O«-rf“ „41T 


ANWENDUNGEN ZUR DRUCKERSTEUERUHG. 

a — BEENIEN 

1 - WOERTER DIREKT DRUCKEN 

2 — ZEICHENSRETZE GRAFIE UND TEXT 

3 - 5SPERESCHRIFT UHO REVERSE SCHRIFT 
HAHL 9-37 2 

ZEICHENSRETZE. 

EEICHEN- MODS CA=GERFIK, 7=TERT?? 


GERAETENUMMER „3=MÖHITOR, 4=DRUCKER >? 
4 


ascii-zeichensatz fuer text-madus: 


lz224585 785 9 ahcı def 
kur —F r- F r 
au L 4 
! ı . i i R n.- n . Ä _ - Großbuchstaben im 
# 2 -ef S: = 47 5; - 4 Text-Modus zweimal 
$s4dt DT _IDT._I erfaßt 
nA seueEl II EUIA 
Era Un Ber Ze Su, #IFVWE JA 
“re uGM IT GU 1” 
v5 hx=H. =" Has” 
„319, 1r Ze I TE m 
4: iz 12 Ir TE Ir 
+; k CK + Fakb+ ta 
 “ LE£ELE a "LE." 
-=m]IMI rıapnı 
. znTNa "Hs." 
Ta DD: PET U BE Sep > 
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3.5 Maschinennahe Programmierung 


Arbeiten wir mit der Programmiersprache BASIC „ dann bewegen 
wir uns auf einer "mittleren' Sprachebene zwischen unserer Um- 
gangssprache einerseits und der "011011001.."-Sprache des Com- 
puters andererseits; letztere wird auch als Maschinensprache 
bezeichnet. 

Wenden wir uns einer Programmiersprache wie Pascal zu, So ent- 
fernen wir uns noch mehr vom Computerkern: Pascal ist stärker 
strukturiert und hat komplexere Sprachelemente als BASIC. Wen- 
den wir uns umgekehrt der Maschinensprache (Assembler) zu, be- 
finden wir uns auf der "untersten' Sprachebene des Commodore, 
d.h. auf der Ebene seiner aus Bitmustern wie "01101011" beste- 
henden "Muttersprache'. 

In diesem Abschnitt wollen wir einen kleinen Schritt in Rich- 
tung auf die "unterste' Sprachebene wagen: wir betrachten die 
Zeichendarstellung und -codierung, die bitweise Verarbeitung, 
den unmittelbaren Zugriff auf Speicherplatzinhalte und den Um- 
gang mit Maschinenprogrammen. Abschließend wenden wir uns kurz 
dem in den Commodore eingebauten Maschinensprache-Monitor na- 
mens TEDMON zu. 


3.5.1 Zeichendarstellung im ASCII 


Alle Zeichen - seien es Ziffern, Buchstaben oder auch Sonder- 
zeichen - werden im ASCII dargestellt, d.h. es wird z.B. nicht 
der Buchstabe A gespeichert, sondern dessen ASCII-Codezahl 65. 
Die Funktion CHR$ haben wir bereits in Abschnitt 3.3 (Textver- 
arbeitung) verwendet; sie gibt uns für eine Codezahl zwischen 
0 - 255 das zugehörige ASCII-Zeichen an. Programm CHR$-TESTI 
ermöglicht, die Funktion CHR$ zu testen. 





ü von 0-31 Steuerzeichen, 

16 z.B. CHR$(19) für /CLEAR-HOME/ 

321 A Mr EN er Er 
2810. 1 2 Se ee 
6415 AB Du DIEBE IE GM SE KL MEIN ED 
BOIP AR 5 TUE WR En HOHEN EZ 
96 ab 96: Grafik-Zeichen 
112 z.B. CHR$(122) für "Karo" 


Bsp: Codezahl 64+1=65 für A; Codezahl 48+13=61 für = 


ASCII-Zeichenvorrat von 0 bis 127 


Der Commodore verfügt über zwei Zeichensätze (vgl. Abschnitt 
3.4.5.3): den Grafik - Modus _(Grafikzeichen sowie 
Großbuchstaben) und den Text - Modus _(Groß-/Klein- 
schreibung). Im Hinblick auf Sonder- und Grafikzeichen stimmen 
diese Modi nicht exakt mit dem ASCII überein. Die Ausführungs- 
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beispiele zu Programm beziehen sich auf den Grafik-Modus, der 
beim Einschalten des Commodore automatisch zur Verfügung steht 
(Sekundäradresse 0: OPEN 1,4 identisch mit OPEN 1,4,0). 


zu den Ausführungsbeispielen von Programm CHR$-TESTI: 

Für die ASCII-Codezahlen 32-95 erhalten wir Sonderzeichen und 
Großbuchstaben. Für die Codezahlen 161-191 erscheinen Grafik- 
zeichen. Nach Eingabe der Codezahl 14 wird in Sperrschrift ge- 
druckt: mit der Anweisung 140 PRINT CHR$(14) haben wir somit 
dass Steuer zeichen Normal-/Sperrschrift abgesandt. 


Codierung und zwei Ausführungen zu Programm CHR$-TEST1: 


10a REM ======PROGSRAMM CHRF-TESTI 

118 PRINT "TEST DER FUNKTION CHEFS." 

120 PRINT "A.E TIFFEH FUER CHR£iR....Er:" 
132 INPUT ALE 

iga FOR I=sA TO E: PRINT CHRELT2.: NERT I 
150 END 


TEST DER FUNKTION CHREC. 
R,E TIPFEH FUER CHR$LA,...„E:: 
32. 35 


tr LEITET 33: Se 7BAECDEFGHITELNNOFORSTUNDEATZLEITE 


TEST DER FUNKTION CHRE$C>. 

A,E TIFPEH FÜUER CHR$CR....E>: 
i61l , 131 

ia 12.9 Ibm. Ta "9 


TEST DER FÜHKTION CHR&CH, 
R.E TIFPEHN FÜUER ECHRFUR,...E>: 
14 ,„ 14 


FEHD''. 


TEST DER FUHFKETIOH CHF=#F«>. 
A,E TIFFEH FUER CHRF=£«ırM...>.,.E»: 
14 . 17 


Das Programm ASCII-TESTI dient zum Testen der Funktion AScC. 
Die Funktion ASC liefert als Umkehrung der Funktion CHR$ die 
zugehörige Codezahl: Das Zeichen "!" wird als Codezahl 33 und 
die Ziffer 0 als Codezahl 48 intern gespeichert. Das "!'" kommt 
vor der 0, es gilt "!<0". Die Wertigkeiten der Codezahlen be- 
stimmen demnach die Sortierfolge; wir werden bei den Sortier- 
verfahren in Abschnitt 3.7 darauf zurückkommen. 

Drücken wir die Funktionstaste /F4/, erscheint das Anweisungs- 
wort SCNCLR, mit der diese Taste standardmäßig belegt ist, so- 
wie die zugehörige Codezahl 83 (SCNCLR belegt natürlich weite- 
re Stellen; auf diesen '"Zusatzcode' gehen wir hier nicht ein). 
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Codierung zu Programm ASCII-TESTI: 


======PRÜGRAMM ASCII-TESTI 
"ASCII-WERTE WON ZEICHEN TESTER: " 
12a INPUT "EINGABE EINES ZEICHENS NORMAL <-"; Z#$ 
138 PRINT "DARSTELLUNG IM ASCII INTERN --->"5 ASCCZ$) 
14a IF ARSCCZ$)<CH45 THEN 120 
158 PRINT "TEXTENDE." : END 


Ausführung zu Programm ASCII-TESTI: 


ASCII-WERTE VON ZEICHEN TESTEN: 
EINGABE EIHMES ZEICHENS NORMAL <=! 
DARSTELLUNG IM ASCIT INTERN 
EINGABE EINES ZEICHENS HORMAL 
DARSTELLUNG IM ASCII INTERN 
EINGABE EINES ZEICHENS NORMAL 
DARSTELLUNG IM ASCII INTERN 
EINGABE EINES ZEICHENS NORMAL 
DARSTELLUNG IM ASCII INTERN 


33 


43 


---) 
1 
---> 
<H 
-—) 
ce 


> 


35 
eii 


EINGAEFE EINES ZEICHENS NORMAL 
DARSTELLUNG IM ASCII INTERN 
EINGAFE EINES ZEICHENS NORMAL 
DARSTELLUNG IM ASCII INTERN 
EINGABE EINES ZEICHENS NORMAL 


a 
---ı 215 
<=-SCHELR 
-_ 83 
= 


DARSTELLUNG IM ASCII INTERN  ---} 48 


TESTENDE. 


3.5.2 Umwandlung dezimal, binär und hexadezimal 


Programm DEZIMALBINAERI wandelt eine Dezimalzahl D in eine Bi- 
närzahl B um, die als 16-Elemente-Array vereinbart ist (Anwei- 
sung 140 DIM B(16) reserviert für B genau 16 Zahlkomponenten). 
Zur Umwandlung in der Schleife 170 FOR I ... 200 NEXT I wird 
D wiederholt halbiert, um bei Teilbarkeit ohne Rest eine 0 und 
sonst eine 1 nach B zu schreiben. Diese Binärzeichen 0 bzw. 1 
schreibt DEZIMALBINAERI in Richtung der höheren Wertigkeit von 
rechts nach links nach B; deshalb auch die Schrittweite STEP-1 
in der FOR-Anweisung (Stelle 16, 15, 14, ...). 


Ausführungen zu Programm DEZIMALBINAER!: 


UMHRHDLUNG DEZIMAL --> BINAER 
"BINRERMUSTER ALS 165-ELEMENTE-ARERT:. 
GAHZERHL EINGEBEHT 51 


UMAURAHNDLUNG ALS 15-5TELLIGE EINAERZAHL: 
aaa aaa aa 1 a A ı 1 


oh‘ 
5 
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UMWANDLUHNG DEZIMAL --> EINAER 
"BINAERMLSTER ALS 15-ELEMENTE-ARRAT?. 
GANZZAHL EINGEBEN? 65535 


UMMAHDLUNG ALS 16-5TELLIGE BINAERZAHL ° 
ıiııı 1371717171711 717171071 0101 


Codierung zu Programm DEZIMALBINAER!I: 


100 REM ======PROGRAMM DEZIMALBINAERI 
118 PRINT "UMWANDLUNG DEZIMAL --> EIHNAER" 
12a FRINT "CBINRERMUSTER ALS 16-ELEMENTE-ARRATS." 
138 : 
148 DIM Belle} : INPUT "GANZZAHL EINGEBEN"; I 
1558 IF DE>INTED> THEH FRINT "GANZZAHLIG." : GOTO 149 
160 IF D}63336 THEH FRINT "KLEINERE ZAHL." : GOTO 148 
178 FOR I=165 TO 1 STEF -1 
isa IF D’z=INT(D/2> THEH LET BCI>=0: 
ELSE LET P@I;=1 


1209 LET D = INT(iD/ZH 

200 NEAT I 

2ia PRIHT : PRINT "UMWUANDLUNG ALS 15-5TELLIGE EINAERZAHL : " 
eh EN I=1i TO 16: PRINT B£T3;: MEXT I 

&3a END 


Proyramm BINAERDEZIMALI unterscheidet sich in zwei Punkten vom 
Programm DEZIMALBINAER1: Einserseits wird umgekehrt umgewan- 
delt, andererseits liegt das Binärmuster bzw. die Eingabegröße 
als String B$ vor, nicht aber als Array B( ). Mit MID$(B$,I,1) 
nimmt man das jeweils nächste Zeichen von B$; da es stets eine 
0 oder 1 ist, kann dieses Zeichen mit VAL in einen numerischen 
Wert verwandelt und nach S zugewiesen werden (S für Stellenin- 
halt). Dann wird 'S mal (2 hoch (L-I))' multipliziert und der 
so errechnete Stellenwert in Zeile 170 zur Dezimalzahl D hin- 
zuaddiert. 


Codierung und Ausführungen zu Programm BINAERDEZIMALI1: 


iga REM ======PROGEAMM BINRERDEZIMAL1 

11a FRINT "UMWUANDLUNG BIHRER --> DEZIMAL" 
128 FRINT "WBINRERMUSTER ALS STRING?" 
130 PRINT "EINRERMUSTER TIFFEN:": IMFUT B# 
i4g LET D=a : LET L=LEHNCB$) 

150 FOR I=1 TOOL 

164 LET S=YALCMIDELBE.T, 13. 

174 LETISD+ 5 #2 TiL-I9 

184 NEAT I 

139 FRINT "UMWUAHDLUHNG DEZIMAL: ";I 

200 PRINT "ENDE." : EHD 


UMWANDLUHG EINAER --> DEZIMAL UMWUAHNDLUHNG BIHAER -—-> DEZIMAL 
"BINAERMLUSTER ALS STEINGN. “EINRERMUSTER ALS STRING). 
EINARERMUSTER TIFFEH: EINREFMUSTER TIPPEN: 

115911 4111111111 111111 

UMWANDLUNG DEZIMAL: 51 UMWANDLUHG DEZIMAL: 65535 


ENDE. ENDE. 
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Neben den Dezimalziffern gibt es auch Hexadezimalziffern: 
0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F (16 Hexadezimalziffern) 


Diese 16 Ziffern werden auch kurz Hex-Ziffern oder Sedezimal- 
ziffern genannt (vgl. Abschnitt 1.2.3.2). 

Programm HEXDEZIMALI demonstriert den Umwandlungsvorgang von 
hex nach dez. In Teil 1 des Programms prüfen wir, ob die Ein- 
gabe Hi1$ nur aus den 16 Hex-Zeichen 0123456789ABCDEF besteht. 
In Teil 2 geschieht die Umwandlung: Die Hex-Zeichen A-F werden 
durch die Dez-Zeichen 10-15 ersetzt und in Z abgelegt. Darauf- 
hin wird Z mit den jeweiligen Stellenwerten 1 (=16 hoch 0), 16 
(=16 hoch 1), 256 (=16 hoch 2), ... multipliziert und zur De- 
zimalzahl D hinzuaddiert. 


Codierung zu Programm HEXDEZIMAL]: 


186g REM ======FRÖGEAMM HEADEZIMAL1 

118 PRINT "UMUANDLUNG HEX --> DEZIMAL." 
0 

1328 REM ======VEREINERRUNGSTEIL 


142 REM Hör: TEAT “le HER-ZEICHEN) 

154 REM H1$: TEXT SUMZUWANDELNDER YALITNGABETERT? 
162 REM L: IHTEGER ÜLAENGE “ON HiF} 

17a REM F: IHTEGER “FLAGGE FUER EINGABEFEHLER) 
152g REM DU: INHTEGER (ERGEENIS IM DEZIMALSYTSTEM) 
130 REM Z#$: TEXT CHAECHSTES ZEICHEN YON H1#) 
a8 REM 1,J: IMNTEGER CLAUFWARIABLEN) 


226 REM ======AHWEISLUNGSTEIL 

23a LET Hö$="a123456739ABCDEF" : REM 16 HEX-ZEICHEN 
248 INFUT "WERT HER TIFFEN: ";Hi$ : FRINT 

2520 LET L=LEHNCHIF) 


278 REM ###TEIL 1: EINGABE AUF GUELTIGKEIT PRUEFEN% 
250 PRIHT "FRUEFUNG AUF GUELTIGKEIT:" 

23a FOR I=1 TOOL 

sa0 LET F=1 : REM FLAGGE F AUF F=FEHLER SETZEN 
318 FOR J=1 TO 16 

32a IF MIDECHOE, J. 1 >=MID$SCH1$, 1,12 THEN LET F=i 
330 MEAT I 

240 IF F=1 THEN 568 

3584 FRINT 1:". ZEICHEN IH ";H1F;" KORREKT." 

364 HEAT I 


358 REM 3##TEIL 2: UMWAHNDLUHG HEA --> DEZIMALERERER 
334 FRIHT : PRIHT "UMMAHNDLLUNG:" 

4a FÜR I=1 TOL 

415 LET Z#=eMIDseHliF,iL-Ir1l2.12 

4 IF Z$.="2" THEN LET Z=eYRAL\S$) 

420 IF Z#="R" THEH LET Z 
+46 IF Z$="B" THEHN LET 
454 IF Z#="C" THEN LET 
454 IF Z#="D" THEN LET 
4a IF Z$="E" THEM LET 
432 IF Z="F" THEHN LET 
434 LET ZeittletI-120 0 
sad PRINT "FUER "328": "DE" UM "52," ERHÜEHT." 
18 LET D=el+te 

sz2a MEHT I 


IITJIMITISITIMN 
vn DB uhH 


mi pi mi m 
in a ioiflr 
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538 FREINT : FRINT "ERGEEHIS:" 

s4g FREINT Hi$:" HEK ERGIET ";D;" DEZIMAL." 
Sad GOTO Sr 

ser FREINT I". 

sra ENI 
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: GOTO Sr 


ZEICHEN IM ":HiF:" FEHLERHAFT." 


Ausführungen zu Programm HEXDEZIMAL!1: 


UMWANDLUNG HEA --> DEZIMAL. 
WERT HEX TIPPEH: 
3ER 


UMWANDLUNG HEX --> DEZIMAL. 
WERT HEX TIFPEN: 
FFFF 


PRUEFUNG AUF GUELTIGKEIT: PEUEFUNG AUF GUELTIGKEIT: 

1 . ZEICHEN IM 3ER KORREKT. 1. ZEICHEN IH FFFF KORREKT. 
& .„ ZEICHEN IN 3ER KORREKT. @2 „ ZEICHEN IN FFFF KÜRREKT. 
3 „ ZEICHEN IN 3ER KORREKT. 3 .„ ZEICHEN IN FFFF KORREKT. 


4 .„ ZEICHEN IN FFFF KORREKT. 
UMHAHDLUNG: 


FUER A: 5 UM 18 ERHOEHT. UMWANDLUNG : 
FUER E: 1a UM 224 ERHOEHT. FUERF: a UM 15 ERHOEHT. 
FÜUER 3: 234 UM 7868 ERHOEHT. FUER F: 15 UM 240 ERHDEHT. 
FÜUER F: 255 UM 3348 ERHOEHT. 
ERGEBNIS: FUER F: 4695 UM 6id4a ERHDEHT. 
3ER HEX ERGIET 1882 DEZIMAL. 
ERGEBHIS: 


FFFF HEX ERGIBT 65535 DEZIMAL. 


Mit der Standardfunktion DEC() können wir die Umwandlung über- 
prüfen: Die Eingabe von PRINT DEC("3EA") ergibt 1002 und die 


Eingabe von PRINT DEC(H$) ergibt 65535 (Annahme: H$ enthält 
den Hex-String "FFFF"). Für Werte über 65535 wird ein ILLEGAL 
QUANTITY ERROR ausgegeben. 

Programm DEZIMALHEX1 wandelt umgekehrt Dezimalzahlen in Hexa- 


dezimalzahlen um und demonstriert dazu zwei Methoden: 


1. Die Funktion HEX$(DEZ) wandelt die Dezimalzahl DEZ in das 
16er-Zahlensystem um. 


2. Zusätzlich wird die Umwandlung ohne Verwendung von HEX$ an- 
gegeben. Diese läuft entsprechend dem 'Vorgehen 2' der Ab- 
bildung "Zwei Vorgehensweisen ..." Schritt für Schritt ab. 


Zur Bestimmung der Hexadezimalziffer HZI$ gehen wir dabei wie 
folgt vor: Hat HZI einen Wert 0,1,2,...,9, ergibt CHR$(48+H2I) 
dann die entsprechende Ziffer 0,1,2,...9. Hat HZI aber einen 
Wert zwischen 10 und 15, ermittelt CHR$(55+HZI) die zugehörige 
ziffer A,B,..,F. Dazu zwei Beispiele: 


- CHR$(55+11) ergibt CHR$(66) ergibt B. 
- CHR$(48+4) eryibt CHR$(52) ergibt 4. 


Dabei wird berücksichtigt, daß die Dezimalziffern im ASCII mit 
Codezahl 48 beginnen und die Großbuchstaben mit Codezahl 65. 
Die Variable CODE enthält deshalb 48 oder aber 55 (55+10 für A 
ergibt dann 65). 
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VORGEHEN: HEX-ZIFFERN FALLEN IN RICHTIGER FOLGE 5C8F AN 


3 2 1 0 


23695 = 5*#16 + 12%16 + 8*16 + 15*16 5C8F hex 


abgelesen 
= 5%4096 + 12%256 + 8*16 + 15%1 


20480 + 3072 + 128 + 15 


VORGEHEN 2: HEX-ZIFFERN FALLEN IN UMGEKEHRTER FOLGE F8C5 AN 


DEZ = (TEIL=INT(DEZ/16) * 16) + HZI=DEZ-(TEIL*16) HE$ 
23695 = (1480 “IE + 15 F 
1480 = (7792 * 16) + 8 8 
92 = ( 5 “16 + 12 c 
5= ( 0 * 176) + >" 5 


Zwei Vorgehensweisen zur Umwandlung von 23695 dez in 5C8F hex 


ohne Verwendung der BASIC-Funktion HEX$ 


Codierung zu Programm DEZIMALHEX!: 


126 REM 


118 
120 
130 
149 
150 
150 
170 
180 


======PROGRAMM DEZIMALHER1 

PRINT "UMWANDLLNG DEZIMAL --> HER." 

REM ======VEREINBARUNGSTEIL 

REM DEZ: INTEGER CDEZIMALZAHL > 

REM HE$: STRING CHEXADEZIMALZAHL > 

REM HZI: INTEGER (HEXADEZIMALZIFFER? 

REM HZI#: STRING ©... FUER HI 

REM TEIL: INTEGER “GANZZAHL-TEIL VON DEZ» 
REM CODE: INTEGER <ASCII-CODEZRAHL FUER HZI} 


130 : 


208 


REM ======AHWEISUNGSTEIL 

LET HE$="" : REM LEERSTEING ZUM VERKETTEN MIT + 
INPUT "MELCHE ZAHL"; DEZ 

PRINT: PRINT "1. FRÜOBE MIT FUNKTION HEA$:" 
PRINT DEZ; "ERGIBT ";HER$TDEZ. 


PRINT: PRIHT "2. UMWAHNDLUNG SCHRITTWEISE: " 
DÜ WHILE DEZE 

LET TEIL=INTCDEZ/16} 

LET HZI=TDEZ-(TEIL#16) 

IF HZI>3 THEN LET CODE=33: 

ELSE LET COlE=45 

LET HZI$=CHRFCCODE+HEI> 

FEINT " HE#X-ZIFFER: ";HZIF 

LET HE$=HEIF+HEF 

LET DEZ=TEIL 
LOUP 
PRINT "HE#ATDEZIMALERHL -> "HE : END 
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Ausführungen zu Programm DEZIMALHEX1: 


UMWANDLUNG DEZIMAL --> HER. UMWANDLUNG DEZIMAL --> HER. 
WELCHE ZAHL? 23373 WELCHE ZAHL? 266 

il. PROEE MIT FUNKTION HE##E: il. PROBE MIT FUNETIOH HEX$: 
23973 ERGIBT 5DAS 265 EEGIBT lc 

2. UMWUAHNDLUNG SCHRITTWEISE: 2. UMWAHNDLUNG SCHRITTWEISE: 
HEX-ZIFFER: 5 HEA-ZIFFER: A 

HE#-ZIFFER: A HEA-ZIFFER: 8 

HE#-ZIFFER: I HEA-ZIFFER: 1 

HE#X-ZIFFER: 5 HEXADEZIMALZAHL -> 10 


HE#ADEZIMALZAHL -> SDAS 


3.5.3 Daten Bit für Bit verarbeiten 


Ergänzend zu Programm DEZIMALBINAERI wollen wir zur "Umwand- 
lung von Dezimalzahlen in Dualzahlen" die Programme DEZIMAL- 
BINAER2 bis DEZIMALBINAER4 betrachten. 

Diese drei Programme demonstrieren den Einsatz des logischen 
Operators AND zur Verarbeitung einzelner Bits. 
Die logischen Operatoren haben wir bereits in Abschnitt 3.2.3 
im Zusammenhang mit der Verzweigungstechnik (Programme BOOLEAN 
1 bis BOOLEAN3) kennengelernt. 


Im Ausführungsbeispiel zu Programm DEZIMALBINAER2 wird die 200 
in die Dualzahl 11001000 umgewandelt. Die Codierung zeigt, daß 
die Umwandlung in einer abweisenden Schleife über die Anwei- 
sungsfolge 


180 DO WHILE I<>0 

180 LET I=1/2 

190 PRINT ABS( (IANDD) = I); 
200 LOOP 


mit den Zahlen D=200 und I=256 als Anfangswerten erfolgt. An- 
weisung 190 führt mit I AND D eine logische Operation über 
"logisch UND" durch. Dabei werden die INTEGER-Zahlen in I und 
D binär dargestellt und Bit für Bit mit AND (logisch UND) ver- 
knüpft. Für die Anfangswerte I=128 und D=200 wird demnach die 
Operation (I AND D) als (128 AND 200) computerintern binär als 
(10000000 AND 11001000) bitweise ausgeführt. Nur die 8. Stelle 
ergibt 1 als Stellenergebnis (1 AND 1 ergibt 1), während alle 
anderen Stellenergebnisse 0 ergeben. (10000000 AND 11001000) 
ergibt somit 10000000 bzw. 128 als Ergebnis. 

In Zeile 190 wird jetzt der Vergleich (128=128)? ausgeführt 
mit dem Ergebnis WAHR bzw. TRUE bzw. -1. 

Dann wird in 190 der Absolutbetrag ABS(-1) gleich 1 ermittelt 
und mit PRINT 1; ausgegeben. 
Diese bitweise Manipulation mittels AND wiederholt sich, bis 
I den Wert 1 erreicht hat. Die ersten drei Schleifendurchläufe 
gibt die Abbildung wieder. 
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Anweisung 190 PRINT ABS((I AND D)=I); von Programm 
DEZIMALBINAER2 in Einzelschritten: 


Schleifendurchlauf: Bitweise Verknüpfung (I AND D): 
1. DURCHLAUF: I=128 und D=200. 10000000 =128 

(I AND D) ergibt I 1170 .00%.0-8 9 =200 

(I = I) ergibt -1 bzw. TRUE. BLEENEI TREND aa 
ABS(-1) ergibt 1. y.0-.0.97079080 =128 

2. DURCHLAUF: I=64 und D=200. 0.7.0910 0,00 = 64 

(I AND D) ergibt I. 7 1.03 97040%0 =200 


(I = I) ergibt -T bzw TRUE. 2 Er nn PT 


ABS(-1) ergibt 1. 0.1 0.0 000-0 = 64 
3. DURCHLAUF: I=32 und D=200. 0071 0:90:09 = 32 
(I AND D) ergibt 0. 1 Da Fa #1 1 EEE Ba ı Fi EB 5 =200 
(0 AND I) ergibt 0 bzw. FALSE. ----------------- - - -- - -- -- 
ABS(0) ergibt 0. 000000600 =... D 


Beispiel zur bitweisen Verknüpfung mittels AND 


Variable I als Filter bzw. als Maske: 

Die logische Operation (I AND D) wird in einer Schleife wie- 
derholt ausgeführt. Dabei bleibt D=200 konstant, während I die 
8 Werte 128=10000000, 64=01000000, 32=00100000, 16=00010000, 
8=00001000, 4=00000100, 2=00000010 und 00000001 annimmt. 

I wirkt wie ein F il ter ,„, der mittels UND bei jedem neuen 
Schleifendurchlauf eine ggf. vorhandene "1" in einer anderen 
Bitposition herausfiltert: in Position 8, 7, 6, ..+.., 1. 

Ebenso kann man I als Maske auffassen, die über eine zu 
prüfende Variable (hier über D) gelegt wird. 


Codierung zu Programm DEZIMALBINAER2: 


186 REM ======PROGERAMM DEZIMALEINRERZ 

112 PRINT "UMWAHLLUNG EINER DEZIMALZAHL IN EINE DUALZAHL" 
125 PRINT "<METHODE: YERGLEICHEN MIT LOGISCH UND“. " 

2 FRINT "ERGEENIS: EBIHNRERMUSTER AUS 5 EINZELZEICHEN). " 
159 INPUT "GANZZAHL UNTER 256"; D 

160 LET 1256 

17a PRINT I5" ALS 8-STELLIGE DUALZAHL : " 

189 DO WHILE Ic 

130 LET I=1I.2 

200 FRINT ABSC<I AND Ih=1); 

2168 LOOP 

228 PRINT : PRINT "ENDE." : END 


Die WHILE-Schleife wird verlassen, sobald I den Wert 1 erhal- 
ten hat. I wird - von 256 ausgehend - bei jeder Wiederholung 
halbiert. 
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Ausführungen zu Programm DEZIMALBINAER2: 


UMWANDLUNG EINER DEZIMALZAHL IN EINE DUALZAHL 
«METHÜDE: VERGLEICHEN MIT LOGISCH “UND”. 
ERGEBNIS: BINRERMUSTER AUS 8 EINZELZEICHENN. 
GANZZAHL UNTER 256 7 200 

208 ALS 8-5TELLIGE DURALZAHL: 

i1ı2BdE a 11a 098 6 
ENIE. 


UMWANDLUNG EINER DEZIMALZAHL IN EINE DUALZAHL 
“METHODE: YERGLEICHEN MIT LÜGISCH “UND“. 
ERGEBNIS: BINARERMUSTER AUS 3 EINZELZEICHEN>. 
GANZZAHL UNTER 256 7 129 

123 ALS 8-STELLIGE DUALZAHL: 

ıi8:BS5 8a 9 8 1 
ENDE, 


Die Programme DEZIMALBINAER3 und DEZIMALBINAER2 bezwecken das- 
selbe, nur wird jetzt die AND-Operation als 


170 PRINT SGN(D AND (2 hoch I)); 


geschrieben. Als Filter bzw. Maske dient wieder 128 (2 hoch 
7 ergibt 128), 64 (2 hoch 6 ergibt 64), ... 


Codierung und Ausführung zu Programm DEZIMALBINAER3: 


1809 REM ======FROGRAMM DEZIMALBINAER3 

112 PRINT "UMWMANDLUNG EINER DEZIMALZAHL IN EINE DUALZAHL" 
128 PRINT "sMETHODE: E#XPONEHT UND LOGISCH “UND”. " 

132 FRINT "ERGEBNIS: BINAERMUSTER AUS & EINZELZAHLEND. " 


158 INFUT "GANZZAHL UNTER 236"; D 
168 FRINT "3-5TELLIGE DUALZAHL : " 
178 FOR I=? TO A STEP -1 

158 PRINT 5SGHED AND Z1T5; 

134 NEHT I 

208 PRINT : PRINT "ENDE." : END 


UMWANDLUNG EINER DEZIMALZAHL IM EINE DURLZAHL 
“METHODE: EAPONENT UND LOGISCH “UND”, 
ERGEBNIS: BINARERMUSTER AUS 3 EINZELZAÄHLEN?>, 
GANZERHL UNTER 256 7 za 
8-5STELLIGE DURALZAHL : 

il aA 18 95 u 
ENDE. 
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DEZIMALBINAER2 sowie DEZIMALBINAER3 können nur Dezimalzahlen 
bis max. 256 in Binärzahlen umwandeln. Programm DEZIMALBINAER4 
hebt die Begrenzung bis 256 (=2 hoch 8) auf und wandelt Zahlen 
bis maximal 65536 (=2 hoch 16) um. 

Dazu wird der Zahlenwert in ein BYTELINKS und ein BYTERECHTS 
aufgeteilt. Auf solche Zwei - Byte - Adressen 
mit einem niederwertigen Byte (hier als BYTELINKS benannt) und 
einem höherwertigen Byte (hier als BYTERECHTS benannt) werden 
wir in Abschnitt 3.5.5.1 ausführlich eingehen. 


Codierung und Ausführungen zu Programm DEZIMALBINAER4: 


196 REM ======PRÖGRAMM DEZIMALBINAER4 

118 PRINT "UMWANDLUNG EINER DEZIMALZAHL IN EINE DUALZAHL” 
1258 PRINT "<METHODE: E&PONENT UND LOSISCH “UND: ZERLEGEN. " 
120 PRINT "ERGEBNIS: BINAERMUSTER AUS 16 EINZELZAHLEN?. " 
40 : 

150 INPUT "GANZZAHL UHTER 655368": ZAHL : PRINT 

158 LET BFTELINKS=IHNTCZAHL/2S6) 

178 PRINT "HOEHERWERTIGES LINKS BrTTE"; BTTELINKS 

134 PRINT "ALS DUALZAHL:"; 

1305 LET D=BrTELINKS : GOSUB 1090 

28M LET EYVTERECHTS = ZAHL-EFTELINKS#2SE : FRIMT 

21& PRINT "NIEDERWERTIGES RECHTES BYTE"; BTTERECHTS 

228 PRINT "ALS DUALZAHL: "; 


230 LET D=BFTERECHTS : GOSUE 1906 
246 FRINT "EHDE.": END 

258 

Pd =] u 


15689 FOR I=? TO 8 STEF -1 
isia PRINT SGHCD AND Z1I>; 
1029 NEAT I 

1933 RETURN 


UMWANDLUNG EINER DEZIMALZAHL IN EINE DUALZAHL 
«METHODE: ESFONENT UND LOGISCH “UND”; ZERLEGEH. 
ERGEBNIS: BINAERMUSTER AUS 16 EINZELZAHLEN?. 
GANZERHL UNTER 65535 ? 32267 


HOEHERWERTIGES LINKS BTTE 126 

ALS DUALZAHL SS 1 111717108 
MIEDERWERTIGES RECHTES BYTE 11 

ALS DUALZAHL SO a a a 1 8 1 LENDE. 


UMWANDLUNG EINER DEZIMALZAHL IH EINE DUALZAHL 
“METHODE: EXPONEHT UND LOGISCH “UND”; ZERLEGEN. 
ERGEBNIS: BINRERMUSTER AUS 16 EINZELZAHLEN?. 
GANZZAHL UNTER 65536 7 320 


HÜEHERWERTIGES LINKS BTTE 1 

ALS DALZAIHL a BG Oo Ba a a Gi 
NIEDERWERTIGES RECHTES BYTE 64 

ALS DUALZARHHL: GO 1 8 a 0 Ga 8 8 ENDE. 
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3.5.4 Unmittelbarer Zugriff auf Speicherinhalte 
3.5.4.1 Stufe 1: Freien Speicherplatz überprüfen 


Der wiedergegebene direkte Dialog gibt ein Beispiel, wie durch 
Anwendung der Funktion FRE(0) der noch freie Speicherplatz ab- 
gefragt werden kann. 

Zunächst löschen wir den Hauptspeicher RAM mittels NEW. 

Vor dem Laden des Programmes VERBRAUCHI sind noch 12275 Bytes 
frei, das sind die 12277 Bytes RAM nach dem Systemstart abzüg- 
lich 2 Bytes für die Direktanweisung PRINT FRE(0). Nach Laden 
von VERBRAUCHI verbleiben noch 12158 Bytes und nach Ausführung 
dieses Programmes noch 12137 Bytes. 

Die Anweisungen des Programms VERBRAUCHI beanspruchen demnach 
117 Bytes an Speicherplatz (12275-12158=117). 


Vor der ersten Ausführung von Programm VERBRAUCHI sind im RAM 
noch keine Speicherplätze für Variablen eingerichtet. Erst im 
Laufe der Programmausführung werden Zahlenwerte in die Variab- 
len T(z.B. 60), K (z.B. 346) und D (z.B. 17.3410405) zugewie- 
sen. Dafür belegt der Computer genau 21 Bytes an Speicherplatz 
(12158-12137). 

In Abschnitt 3.5.5 gehen wir auf die Speicherung der Daten und 
Anweisungen eines BASIC-Programms näher ein. 


Direkter Dialog zur Demonstration der Funktion FRE(O): 


NEW /RET/ RUN /RET/ 
READY. EINGABE: GEFAHRENE KM 
PRINT FRE(0) /RET/ 346 /RET/ 
12275 AUSGABE: LITER/100 KM 
READY. 17.3410405 
READY. 
PRINT FRE(0) J/RET/ 
12137 
DLOAD "VERBRAUCHI" READY. 
SEARCHING FOR 0:VERBRAUCHI 
LOADING 
READY. /RET/ bedeutet "RETURN-Taste 
drücken". 
PRINT FRE(0) J/RET/ Programm VERBRAUCH1: siehe 
12158 Abschnitte 2.2 sowie 3.1.1. 
READY. 


Die Angabe von 12277 freien Benutzerbytes des RAM bezieht sich 
auf die Computer Commodore 16 und Commodore 116 . Beim Typ 
Commodore plus/4 stehen statt 12277 Bytes genau 60671 Bytes an 
Speicherplatz zur Verfügung. 


Der Benutzer-RAM des plus/4 ist um 48394 Bytes größer als der 
RAM des C-16 bzw. C-116 (60671-12277 ergibt 48394). Addieren 
wir zu den C-16-Angaben 48394, so erhalten wir die dem plus/4 
entsprechende Speicherplatzangabe. 
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3.5.4.2 Stufe 2: Speicherplatzinhalte mit PEEK lesen 


PEEK(10000) gibt den Inhalt des Speicherplatzes mit der Adres- 
se 10000 wieder. Dabei können wir PEEK als Direktanweisung in 
der Form PRINT PEEK(10000) schreiben oder aber innerhalb ei- 
nes Programmes z.B. wie folgt programmieren: 


20 PRINT "INHALT VON SPEICHERPLATZ 10000: ";PEEK(10000) 


Die Anweisung 50 LET F=PEEK(10000) ordnet den Wert der Varia- 
blen F zu und ie Anweisung 70 IF PEEK(10000)=9 THEN.. fragt, 
ob in dieser Adresse der Zahlenwert 9 gespeichert ist. 


Zum Commodore plus/4: 

Negative Werte bzw. Adressen legt das System als komplementäre 
Zahlen zu 65535 als der größten durch ein Byte (8 Bits) dar- 
stellbare Zahl ab. Beim Commodore plus/4 gibt antwortet FRE(0) 
häufig mit negativen Zahlen. Warum? FRE(0) wird als Ganzzahl 
(INTEGER-Zahl) gespeichert. Da Daten des Typs "Ganzzahl" nur 
Zahlen bis maximal 32767 sein können, werden bei größeren Zah- 
len negative Werte angezeigt. Addieren wir dabei 65535 hinzu, 
so erhalten wir den "richtigen' Wert. Ein Beispiel: 


PRINT FRE(0) /RET/ 


-9246 (Ausgabe eines negativen Wertes) 

READY. 

PRINT FRE(0)+65535 /RET/ (Komplementäre Zahl zu 65535: 
56289 56289 Bytes tatsächlich frei) 

READY. 


PEEK stellt man häufig in die FOR-Schleife. Die Zählerschleife 
FOR I=2048 TO 3071 : PRINT I;": ";PEEK(I); : NEXT I /RET/ 


gibt den Inhalt der Speicherplätze 2048 bis 3071 aus. Dieser 
dezimalen Adressenangabe entspricht die hexadezimale Angabe 
von 800 bis BFF, die zur Unterscheidung auch als %$%800 - $BFF 
geschrieben wird . Lassen wir die im direkten Dialog eingege- 
bene Schleife ablaufen, dann werden ASCII-Codezahlen zwischen 
0 und 255 gezeigt. Warum? 255 dezimal = $FF ist die größte 
in einem Byte bzw. einem Speicherplatz unterzubringende Zahl. 
Die Zählerschleife 


30 FOR Z=1 TO 7: LET A(Z)=PEEK(10767+2) : NEXT 2 
speichert die Inhalte der Speicherplätze 10768, 10769, ... in 


den Array A() ab. Dies ist immer dann sinnvoll, wenn mit Spei- 
cherplatzinhalten weiter gearbeitet werden soll. 
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Arbeitet man mit PEEK (Adreßinhalte direkt lesen) oder mit 
POKE (direkt schreiben) ,sind häufig Umrechnungen von hexadezi- 
malen in dezimale Adreßangaben vorzunehmen. 

Diese Umrechnungen von HEX nach DEZ können mit der umseitigen 
Tabelle wie folgt vorgenommen werden: 


1. Beispiel: $FF69 - dezimal 65385 
FF (Zeile unten, Spalte rechts) ergibt 65230 als unteren 
Tabellenwert, da FF das 1. Ziffernpaar ist. 
69 (Zeile 6 und Spalte 9) ergibt 105 als oberen Wert, 
da 69 das 2. Paar ist. 
65280+105 ergibt dezimal 65385. 


2. Beispiel: $800 - dezimal 2048 
08 (obere Zeile 0 und Spalte 8) ergibt 2048 als unteren 
Tabellenwert, da 08 das 1. Paar ist. 
00 (obere Zeile und linke Spalte) ergibt 0. 
2048+0 ergibt dezimal 2048. 


Für Umrechnungen vom dezimalen in das hexadezimale System be- 
nutzen wir die HEX$-Funktion: HEX$(65385) ergibt wieder $FF69. 


Statusvariable ST als Beispiel für PEEK: 

Die Statusvariable ST ist in Adresse 144 abgelegt und enthält 
einen Wert ungleich null, wenn Ein-/Ausgabefehler auftauchen. 
Der direkte Dialog 


DLOAD "XXX" /RET/ 

FILE NOT FOUND ERROR 

READY. 

PRINT PEEK (144) /RET/ (Adresse 144 mit PEEK abfragen) 
66 

READY. 


zeigt, daß unter dieser Adresse 144 nach dem Versuch, das gar 
nicht existierende Programm XXX zu laden, der Wert 66 als Feh- 
lerart gespeichert worden ist. In ST ist der augenblickliche 
Status externer Geräte (Datasette, Floppy) abgelegt. Der Gerä- 
testatus der Floppy deutet mit 66 auf einen Ein-/Ausgabefehler 
hin. 

Die Systemvariable ST darf nicht mit den Systemvariablen DS 
und DS$ verwechselt werden, in denen Fehlerart und -ort aus- 
schließlich beim Diskettenzugriff abgelegt werden: 


DLOAD "XXX" /RET/ 
FILE NOT FOUND ERROR 
READY. 

PRINT DS /RET/ 

62 (Fehlernummer in DS) 

PRINT DS$ /RET/ 

62, FILE NOT FOUND,00,00 (Nummer, Art und Ort des Fehlers) 


Auf DS und DS$ gehen wir in Abschnitt 3.8 ausführlich ein. 
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8 32768 1 33024 1 33280 I 33536 I 33792 1 34048 1 34304 I 34560 I 34816 I 35072 I 35328 I 35584 I 35840 I 36096 I 36352 I 36608 I 
sa2]=22=22=222]22=2=222=2]==2=22=2==2]222=2222 [2222222 [2222222 [2222222 [22222=2 [2222522 ]2=2222= [2222222 [2222222 [2222222 [2222222 [2222222 [2222222] 
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I 
s 2081 2091 2101 211 23121 231 241 251 261 271 2181 2191 201 2211 2221 2231 
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s22]=222===2=2]|=2=2=2222=2][]=2=2=22222]23=222=2= [2222222 [2222222 [2222222 [3222222 []2222222 [2222222 [2222222 [2222222 [2222222 [2222222 [2222 222]2222eem] 
se al 251 2 27 2a 291 201 211 2321 231 241 2351 231 2371 2381 2391 
Et I------ I------- I------ I------- I I------- I------ I------- I------- I------- I------- I------- I------- 1------- I------ N 
8 57344 1 57600 1 57856 I 58112 I 58368 I 58624 I SBBRO I 59136 1 59392 1 59648 I 59904 I 60160 I 60416 1 60672 I 60928 I 61184 I 


8 2001 21 221 231 241 2451 241 2071 21 291 2501 21 25218 2531 241 2551 
Fi I------- I------- I------- I------- I------- I------- I------- I------- I----- I------- I------- I------- I------- I------- I 
8 61440 1 61696 1 61952 I 62208 1 62464 I 62720 I 62976 1 63232 I 63488 1 63744 I 64000 I 64256 1 64512 I 64768 1 65024 I 65280 1 
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3.5.4.3 Stufe 3: Speicherplatzinhalte mit POKE schreiben 


PEEKen können wir Speicherplätze des RAM wie des ROM, während 
umgekehrt nur Speicherplätze des RAM gePOKEt und damit neu be- 
schrieben werden können. 

POKE 650,0 speichert die O0 in den Speicherplatz mit der Adres- 
se 650 ab. Man sägt: "poke die 0 nach 650" (nicht schön, aber 
kurz). Das zweite Argument muß zwischen O0 und 255 liegen. Die 
Anweisung POKE PLATZ,ZAHL speichert den Inhalt von ZAHL an die 
Adresse von PLATZ ab. Die Ausgabeschleife 


100 FOR I=1 TO 7 : READ C : POKE (10767+2),C : NEXT I 
110 DATA 101,6,101,6,133,8,96 


speichert die 7 in der DATA-Zeile angegebenen Zahlen in die 
Speicherplätze mit den Adressen 10768, 10769,... ab. 


Vor jedem Poken muß überlegt werden, ob nicht Speicherinhalte 
verändert werden, die für die Ablaufsteuerung wichtig sind. 
Zum "Üben" sei empfohlen, nur den Speicherplatz mit den Adres- 
sen 


4097 - 16373 (für Commodore 16 und Commodore 116) 
4097 - 64768 (für Commodore plus/4) 


zu verwenden, d.h. den für die BASIC-Programme zur Verfügung 
stehenden Benutzerspeicher. 


3.5.4.4 Stufe 4: Aufruf von Maschinenprogrammen 


Beim Commodore plus/4 rufen wir mit der Anweisung 
SYS 1521 


ein Maschinenprogramm auf, dessen erster Befehl im Hauptspei- 
cher unter der Adresse 1521 steht. 

Unter der Adresse 1521 beginnt beim Commodore plus/4 eine Rou- 
tine, die das eingebaute Textverarbeitungs- 
programm aufruft. Dieses Programm ist ROM-resident und 
gehört zur eingebauten Software (sog. Built-In-Software). 

Das Handbuch nennt mehrere solche vom Betriebssystem bereitge- 
stellte Maschinenprogramme. 


Auch der Anwender kann Routinen in Maschinensprache (Assembler 
genannt) schreiben, im RAM ablegen und später mit SYS zur Aus- 
führung bringen. Diese Arbeiten werden vom Maschinensprache- 
Monitor unterstützt (vgl. Abschnitt 3.5.6). 

Die hinter SYS angegebene Ganzzahl muß zwischen 0 und 65535 
liegen, um die Startadresse der Maschinensprache- Routine ange- 
ben zu können. 
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Die Funktion USR() unterscheidet sich in zwei Punkten von der 
Funktion SYS: 


- Sprung in ein Maschinenprogramm, dessen Startadresse stets 
in den Speicherstellen 1281 und 1282 abgelegt ist. Diese Be- 
ginnadresse ist als 2-Bytes-Adresse angegeben (vgl. dazu Ab- 
schnitt 3.5.5) und mittels POKE gespeichert worden. 


- USR(P) übergibt den Inhalt von P als Parameter an das Ma- 
schinenprogramm, um von diesem über den Parameter P dann ein 
bestimmtes Ergebnis zu erhalten. 


Auf das Erstellen von Maschinenprogrammen in Assembler können 
wir in dieser BASIC-Einführung nicht eingehen. 


3.5.5 Speicherung eines BASIC-Programms im RAM 


Bei Inbetriebnahme meldet sich der Commodore 16 bzw. 116 mit: 
"COMMODORE BASIC V3.5 12277 BYTES FREE" 


Von den ca. 16 KBytes stehen uns als Benutzer 12277 Bytes zur 
Verfügung, und zwar in den Aäressen 4097 - 16374. In diesem 
Benutzerspeicher wird das BASIC-Programm und die zu verarbei- 
tenden Daten (Variablen) zur Ausführungszeit abgelegt. Arbei- 
ten wir mit dem Commodore plus/4, dann lautet die Meldung: 


"COMMODORE BASIC V3.5 60671 BYTES FREE" 


Eine detaillierte Erklärung der Speicherorganisation würde den 
Umfang dieses Buchs sprengen. Gleichwohl wollen wir anhand des 
Beispielprogramms VERBRAUCHI versuchen, die folgenden Fragen 
zu beantworten: 


- Wo ist das BASIC-Programm und wo sind die Variablen im RAM 
gespeichert? 

- Wie sind die Anweisungen des Programms gespeichert? 

- Wie sind die Daten der Variablen gespeichert? 


3.5.5.1 Organisation des Benutzerspeichers 


In der Übersicht sind wichtige Adressen des Benutzerspeichers 
wiedergegeben. 

Durch Versetzen der Adreßzeiger lassen sich Größe sowie Lage 
der Speicherbereiche verändern. 
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2-Byte-Adressen von Speicherbereichen Beispiel-Adressen 






dezimal (hexadezimal): für VERBRAUCHI: 
oben (für plus/4: 
Auen. _ 64768) 

55, 56 Ende. des BASIC - RAM | 16374 
(37 - 38) | 

51, 52 Anfang des Speicher- | 16374 
(33 - 34) bereichs für Strings | 

49, 50 Zeiger für Array-Ende 4223/4237 
(31 - 32) 

47, 48 Anfang des Speicher- 4223/4237 
(2F - 30) bereichs für Arrays 

45, 46 Anfang des Speicher- 4216 
(2D - 2E) bereichs für 

numerische Variablen | 
43, 44 Anfang des 4097 


(2D,. 20) BASIC-Programms 


unten 


Wichtige Adreßzeiger für den Speicherbereich des Benutzers 


Zunächst laden wir das Programm VERBRAUCHI von der Diskette in 
den RAM. Über den direkten Dialog 


PRINT PEEK(43) + 256*PEEK(44) /RET/ 


erfahren wir, daß das Programm VERBRAUCHI ab Adresse 4097 im 
RAM gespeichert ist. 

Eine mittels PEEK eingelesene Adresse kann den Zahlenbereich 
0-255 nicht übersteigen (Byte mit 8 Bits). Aus diesem Grunde 
werden zwei Bytes verwendet, um auch auf höhere Adressen zei- 
gen zu können; man spricht von Zwei-Byte-Adressen. 


Begriff der 2 - Byte - Adresse: 

Zeiger der Form (Bytel,Byte2) sind 2-Byte-Adressen, die 
im Zahlenbereich 0-65535 liegen. (43,44) ist z.B. eine solche 
2-Byte-Adresse, bei der in Adresse 43 die niederwertigen Stel- 
len und in Adresse 44 die höherwertigen Stellen abgelegt sind. 
Um den dezimalen Wert der Speicheradresse zu erhalten, müssen 
wir den Inhalt des höherwertigen Bytes mit 256 multiplizieren. 
Grund: 256 (dezimal) entspricht $FF (hexadezimal) und damit 
dem binären Maximalwert 11111111 für ein Bytes. 


Array- und String-Speicher: 

Die Speicherbereiche für Arrays (Felder, Bereiche) sowie für 
Strings (Text, Zeichenketten) sind leer; Programm VERBRAUCHI 
vereinbart ja auch keine Variablen der Datentypen String sowie 
Array. Die Adressen 4223 wie auch 16374 sind zugleich Anfangs- 
und Endadressen der betreffenden Speicherbereiche. 
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Speicheraufbau 'von unten nach oben’: 

Alle Speicherbereiche werden von "unten nach oben' aufgebaut, 
das heißt in Richtung immer höherer Adressen. Eine Ausnahme 
bildet der String-Speicher, der von "oben nach unten' aufge- 
baut wird (deshalb im Beispiel die Anfangsadresse 16374, die 
mit dem Ende des BASIC-Anwenderspeichers zusammenfällt). 


3.5.5.2 Speicherung der Daten (Variablen) 


Variablen-Speicher vo r Programmausführung: 

Betrachten wir die Speicherung der Daten im RAM, dann muß un- 
terschieden werden, ob das Programm VERBRAUCHI bereits ausge- 
führt wurde oder nicht. Wir überprüfen zunächst die Belegung 
des Variablen-Speichers v or der Programmausführung: 


FOR I=4216 TO 4223: PRINT PEEK(I);: NEXT I /RET/ (=Eingabe) 
3 0 141 224 0 0 084 (=Ausgabe) 
(I) 


Im Variablen-Speicher ist ab Adresse 4216 allein die Variable 
I als Laufvariable der gerade eingegebenen FOR-NEXT-Schleife 
gespeichert. 


Codierung zu Programm VERBRAUCHI: 


10 LETT = 20 

ee PRINT "EINGABE: GEFAHRENE EM" 
3a IHFUT K 

da LlETD= IM TUE 

et FEIHNT "AUSGABE: LITERIEE KM" 
5a FRINT I 

FE END 


Variablen-Speicher n ac h Programmausführung: 
Jetzt lassen wir mit RUN das Programm VERBRAUCHI laufen. 


RUN J/RET/ 
EINGABE: GEFAHRENE KM 
346 /RET/ 
AUSGABE: LITER/100 KM 
17.3410405 


Im Variablen-Speicher ab Adresse 4097 sind nun die drei REAL- 
Variablen T, K und D gespeichert. Im direkten Dialog schauen 
wir nach, wie diese Variablen abgelegt sind: 


FOR I=4216 TO 4237: PRINT PEEK(I);: NEXT I /RET/ 

84 0 134 112 0 0 0 75 0 137 45 0 0 0 68 O0 133 10 186 115 108 
(T) (K) (D) 

73014 ... 

(I) 
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Die Variablennamen T, K, D, I und N erscheinen nicht; sie wur- 
den nur zur Erklärung eingefügt. 

In Adresse 4216 steht die ASCII-Codezahl 84 bzw. der Buchstabe 
"mW (CHR$(84) ergibt T). In den Adressen 4224, 4231 sowie 4238 
finden wir die Variablennamen K, D und I (I als Laufvariäble 
der von uns im direkten Dialog getippten FOR-Schleife). 


Speicherungsformat von Dezimalzahlen: 

Die Variablen T, K und D sind Dezimalzahlen. Jede Zahl vom Typ 

"REAL bzw. Dezimalzahl' wird vom Commodore in einem 7-Byte-For- 

mat gespeichert: 

- Bytes 1 und 2 für die ersten beiden Zeichen des Variablenna- 
mens (falls kein zweites Zeichen, dann 0). Der Coiwmodore be- 
rücksichtigt also immer nur die ersten beiden Zeichen eines 
Variablennamens (TE und TA sind verschieden, TESTI und TEST2 
dagegen nicht). 

- Bytes 3 bis 7 speichern den Wert in einer normalisierten Ex- 
ponentialdarstellung als Gleitpunktzahl. 


Speicherungsformat von Ganzzahlen: 

zahlen vom Typ 'INTEGER bzw. Ganzzahl' erkennt man daran, daß 

am Ende des Variablennamens ein "%" steht (z.B. T%, M1%). Sie 

beanspruchen ebenso sieben Bytes: 

- Bytes 1 und 2 für die ersten beiden Zeichen des Namens (de- 
ren ASCII-Codezahlen jeweils um 128 erhöht). 

- Bytes 3 und 4 enthalten die Ganzzahl in der Darstellungsart 
(LowByte, HighByte). 

- Bytes 5 bis 7 unbenutzt bzw. 0. 


Mit dem folgenden Programm namens PEEKLESENI können wir das 
Speicherungsformat einer Real-Variablen namens T ausgeben las- 
sen. Da T die erste im Programm VERBRAUCHI angesprochene Va- 
riable ist, wird sie auch unmittelbar am Anfang des Variablen- 
Speichers abgelegt. 

Bei Programm VERBRAUCHI lag der Beginn des Variablen-Spei- 
chers bei der Adresse 4216, während er bei Programm PEEKLESENI 
nun bei Adresse 4515 liegt. Grund: PEEKLESENI als das größere 
Programm beansprucht mehr Speicherplatz. 

Ausführung zu Programm PEEKLESEN]I: 


DLOAD "PEEKLESENI" /RET/ 

RUN /RET/ 

SPEICHERUNG EINER REAL-VARIABLEN ZEIGEN. 
WERT EINER VARIABLEN T ? 1 /RET/ 

T AB ADRESSE 4515 GESPEICHERT. 
VARIABLENNAME IN 4515 UND 4516: 

84 0 

ZAHLENWERT IN 4517 BIS 4521: 

1290000 

ENDE. 


RUN /RET/ 

SPEICHERUNG EINER REAL=VARIABLEN ZEIGEN. 
WERT EINER VARIABLEN T ? 60 /RET/ 

T AB ADRESSE 4515 GESPEICHERT. 
VARIABLENNAME IN 4516 UND 4517: 

84 0 

ZAHLENWERT IN 4517 BIS 4521: 

134 112 000 

ENDE. 
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Codierung zu Programm PEEKLESEN]I: 


108 REM ======PROGRAMM PEEKLESENI 
118 PRINT "SPEICHERLNG EINER REAL-YARIABLEN ZEIGEN. " 

120 INPUT "WERT EINER VARIABLEN T"; T 

130 : 

140 LET ADR=PEEKX453+2S6#PEEK(46) 

1598 PRINT "T AB ADRESSE" ;ADR; "GESPEICHERT. " 

168 PRINT "VARIABLENNAME IN" ;ADR; "UND" SADR+15":" 

17@ PRINT PEEK(ADR) ;PEEKCADR+1) PEEKCADR+6) 
180 PRINT "ZAHLENWERT IN" ;ADR+2; "BIS" ;ADR+6;" :" ' 
138 PRINT PEEK<ADR+2? ;PEEK(ADR+3) ; PEEK(ADR+4) ;PEEKCADR+5); 

208 PRINT "<MERT IN EXPONENTIALDARSTELLUNG 5 BYTES)" 

21@ PRINT "ENDE." : END 


In Zeile 140: Zwei-Byte-Adresse (45,46) wird gelesen und nach 
ADR zugewiesen, um dann gezeigt zu werden. 


3.5.5.3 Speicherung der Anweisungen (Programm) 


Nach der Ablage der Daten von Programm VERBRAUCHI wenden wir 
uns jetzt den Anweisungen dieses BASIC-Programmes zu. Wie wir 
bereits wissen, sind die Anweisungen ab Adresse 4097 abgespei- 
chert. Im direkten Dialog erfahren wir, daß die Anweisungen 
den Zeilennummern 10, 20, ... entsprechend fortlaufend gespei- 
chert sind: 


FOR I=4097 TO 4127: PRINT PEEK(I);: NEXT I /RET/ 
14 16 10 0 136 32 84 32 178 32 54 48 0 44 16 
( 10 LETb Tb =b 60 ‚ ) (b=Blank) 


20 0 153 32 34 69 73 78 71 65 66 69 58 32 71 69 ... 
(20 PRRINITb" EINGABE :: bGE...) 
READY. 


Die Übersetzung der Codezahlen (in Klammern gesetzt) ist ein- 
gefügt. Sie zeigt, wie die ersten beiden Anweisungen LET sowie 
PRINT im RAM untergebracht sind. 

Die Zeilennummern 10 und 20 sind als 2-Byte-Adressen abgelegt 
(Zeilennummer 10 in Adressen 4099 (LowByte) sowie 4100 (High- 


Byte)). 
CHR$(153) steht für PRINT und CHR$(136) für LET, während der 
Zuweisungsoperator "=" durch die ASCII-Codezahl 178 verschlüs- 


selt ist. Auf diese Art werden alle Schlüsselworte von BASIC- 
Anweisungen (=reservierte Worte, Operatoren und Zeichen) abge- 
speichert. Man bezeichnet die so verschlüsselten Anweisungen 
auch als Token ,. Alle Anweisungen sind in einer Token- 
liste mit den zugehörigen Codezahlen zusammengefaßt. 


Ein O-Byte markiert das Ende einer BASIC-Anweisung (hier steht 
unter der Adresse 4110 die 0 für das Ende der LET-Anweisung). 
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Codierung zu Programm POKESCHREIBENI: 


185 REM ======PROGEAMM POKESCHREIBENI 

119 PRINT "DEMONSTRATION: 2-BYTE-ADRESSE SCHREIBEN. " 
111: 

124 REM ======VEREINBARUNGSTEIL 


138 REM LE: LOWEYTE FUER NIEDERWERTIGE STELLEN 
140 REM HB: HIGHBYTE FUER HOEHERWERTIGE STELLEN 
158 REM DEZ: ZAHLENWERT 

i60 REM ADR: SPEICHERADRESSE FUER DEZ 

161 

178 REM ======ANWEISUNGSTEIL 

156 INPUT "ZAHLENWERT (0-63335°"; DEZ 

132 LET HB=INTEDEZ/256) 

2a LET LB=DEE-256#HB 

ela FRINT DEZ;" IN DER FORM <LOWBTTE,HIGHBYTE}: 
zz PRINT LB;",";HE 

238 INPUT "... AB WELCHER ADRESSE SPEICHERN"; ADR 
240 PÜKE ADR,LB : POKE ADR+1,HE 

258 PRINT "ZAHL ALS 2-EVTE-ADRESSE GESPEICHERT," 
Pr 1 Bu 

2r&@ PRINT:PRINT "LESEN ZUR KONTROLLE: " 

238 LET LB=PEEKCADR> : LET HB=PEEKCADR+1) 

230 LET DEZ=LB + 255%HB 

sa PRINT "UNTER DER ADRESSE ©" ;ADR;", "SADR+LS "N" 
31a PRINT "STEHT DER ZAHLENWERT" DEZ 

320 PRINT "ENDE." : END 


wir sind jetzt in der Lage, über PEEK und POKE unmittelbar die 
BASIC-Codierung eines im RAM befindlichen Programms zu ändern. 
Am Beispiel des Programms POKESCHREIBENI wollen wir die Zei- 
lennummer 320 (letzte Zeile dieses Programms) in 400 abändern. 
Dazu geben wir im direkten Dialog ein: 


DLOAD "POKESCHREIBENI" /RET/ 
READY. 

PRINT PEEK(45)+256*PEEK(46) J/RET/ 
4839 

READY. 


FOR I=4800 TO 4839: PRINT PEEK(I);: NEXT I /RET/ 

(... in Adressen 4821 und 4822 entdecken wir 64 (LowByte) 
und 1 (HighByte) ....) 

READY, 


Der Programmspeicher endet also bei der Adresse 4839. Die Zei- 
lennummer 320 | 
steht als Zwei-Byte-Adresse in der Form (64,1) in den Adressen 
4821 und 4322: 

PRINT PEEK(4821)+256*PEEK (4822) /RET/ 


READY. 
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wir führen nun das Programm POKESCHREIBENI aus, um dessen Zei- 
lennummer 320 durch die Nummer 400 zu ersetzen: 


RUN /RET/ 

DEMONSTRATION: 2-BYTE-ADRESSE SCHREIBEN. 
ZAHLENWERT (0-65535)? 400 /RET/ 

400 IN DER FORM (LOWBYTE,HIGHBYTE): 

144,1 

... AB WELCHER ADRESSE SPEICHERN? 4821 /RET/ 
ZAHL ALS 2-BYTE-ADRESSE GESPEICHERT. 


LESEN ZUR KONTROLLE: 

UNTER DER ADRESSE (4821,4822) 
STEHT DER ZAHLENWERT 400 
ENDE. 

READY. 


LIST /RET/ 

... Auflistung von Programm POKESCHREIBEN]I mit 
400 PRINT "ENDE." : END 

als letzter Anweisung ....«. 


Das Programm POKESCHREIBENI hat sich sozusagen "selbst umpro- 
grammiert': die Zeilennummer 400 hat die Nummer 320 ersetzt. 


3.5.6 Maschinensprache-Monitor 


Im ROM des Commodore wird ein Maschinensprache-Monitor bereit- 
gestellt, der den Benutzer beim Inspizieren des Hauptspeichers 
und beim Programmieren in Haschinensprache unterstützt. Dieses 
Monitorprogramm kann pa ra 1 1 e 1 zu BASIC arbeiten und 
umfaßt elf Befehle. Wir benutzen zunächst den Befehl “, um un- 
ser Beispielprogramm VERBRAUCHI zu betrachten. 


3.5.6.1 Monitorbefehl M an einem Beispiel 


Schritt 1: Anfangsadressen hexadezimal angeben 
Über die Funktion HEX$ lassen wir uns die Anfangsadressen des 
Programmes VERBRAUCHI in hexadezimaler Schreibweise angeben: 


PRINT HEX$(4097) /RET/ (=Anfang Programm-Speicher) 
$1001 

PRINT HEX$(4216) /RET/ (=Anfang Variablen-Speicher) 
$1078 

PRINT HEX$(4237) /RET/ (=Ende Variablen-Speicher) 


$108D 
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Schritt 2: Programm laden und ausführen lassen 
wir laden das Programm VERBRAUCHI in den RAM und führen es wie 
folgt aus: 


DLOAD "VERBRAUCHI1" J/RET/ LIST J/RET/ 


RUN /RET/ 10 LET T=60 
EINGABE: GEFAHRENE KM 20 PRINT "EINGABE: GEFAHRENE KM" 
346 /RET/ 30 INPUT K 
AUSGABE: LITER/100 KM 40 LET D=100*T/K 
17.3410405 50 PRINT "AUSGABE: LITER/100 Ku" 
60 PRINT D 
70 END 


In den Variablen T, K und D befinden sich jetzt die Werte 60, 
346 und 17.340405. 


Schritt 3: Maschinensprache-Monitor aufrufen 
Durch die Anweisung MONITOR rufen wir den eingebauten Maschi- 
nensprache-Monitor namens TEDMON auf. 


MONTTOR 


PÜ 5ER Al AR VERS 
‚ gans ma aa Ba aa Fö 


u) 


Schritt 4: Eingabe des Monitor-Befehls M(emory 

Durch den Befehl M (für Memory Dump bzw. Speicherauszug) er- 
halten wir einen Auszug des Hauptspeichers RAM angezeigt. Ge- 
ben wir den Befehl M ohne Argument ein, beginnt der Monitor 
mit der Ausgabe des RAM-Inhaltes ab Speicheradresse 0. Da uns 
der Benutzerspeicher mit dem Programm VERBRAUCHI interessiert, 
tippen wir den Befehl M 1000 ein. Der RAM wird dadurch von 
der Adresse $1000 (bzw. dez 4096) an gezeigt: 


M 1000 /RET/ 


>1aga ga GE iA ar ga 55 2a 5 
>»1aas za B2 2a 36 30 an 2C 10 ek 
>1a1a 14 Aa 99 zu 22 45 49 se Sana! 
>1M18 47 41 42 45 3A 20 47 45 naiia 
>1029 46 41 43 52 45 4E 45 20 aa 
>1928 4B aD 22 Om 34 16 IE DR 1 Mole 
>1030 85 20 4B GB dr 1 28 20 | ElemmEn 
>1038 83 zu 44 za B2 zu 31 20 Sue] 
>1a40 30 20 AC 2a 54 20 AD zO rer 
>1048 4B Q9 68 1A 32 ga 94 20 : eine 
>1958 22 41 55 53 47 41 42 45 Wellpleiaige 
>1058 3A 2m AC 49 54 45 52 27 Hmm 


Der Befehl M gibt den Inhalt von 96 Speicheradressen (12 Zei- 
len mit je 8 Adressen) in hexadezimaler Form aus. Jede Adres- 
se gibt die entsprechende ASCII-Codezahl an (ASCII-Display). 
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In Adresse $1001 steht z.B. $0E, d.h. dez 14. Betrachten wir 
die erste Zeile etwas genauer: 


1000 1001 1002 1003 1004 1005 1006 1007 (Aäresse hex) 
4096 4097 4098 4099 4100 4101 4102 4103 (Adresse dez) 


>1000 00 0E 10 OA 00 88 20 54 (ASCII hex) 
>4096 0 14 16 10 0 136 32 84 A(ASCII dez) 
10 LET T (Bedeutung) 


Wir erkennen also unser ab Adresse 4097 gespeichertes Pro- 
gramm VERBRAUCH mit dem Anfang der Anweisung "10 LETT ...". 
Als Lesehilfe gibt uns der Monitor jeweils rechts in reverser 
Schrift - falls möglich - eine Klarschriftausgabe. In der An- 
fangszeile z.B. finden wir das "T", 

Mit der erneuten Eingab des Monitor-Befehls M lassen wir uns 

den Inhalt der nächsten 96 RAM-Adressen zeigen: 


M /RET/ 
>1Bsea 31 3a SE za de 40 22 Bu IE 


1963 Fa 1a 3C 08 93 za 44 09: ARE en 
»1a7a FE 18 de Da Sa Da De Da Eee Beispiele: 


>»1073 54 09 36 78 Ga Ma aa dB me $54 = 4*1 + 5%*16 
>1asa Ma 83 ZU GR am Ga da Om u = 4 + 80 
>18 55 BA BA 73 EC 4F 45 Da rim = 84 dezimal 


>lgaa ca ag am ga an 51 ga ar: 
»1832 aa sa aa 40 dr Da ga za lem $4B 
land ga aa FFFFFFFFFFFFOCUEE 
>»1aRS FF FFFFFFFFFFFFFF kb 
>1aBS FF FFFFFFFFFFFFFFOhERE 
PlEBS FFFFFFFFFFFFFFFF Ok 


11%1 + 4%16 
11 + 64 
75 dezimal 


In der Adresse $1078 (4216) beginnt bereits der Variablen- 
Speicher. Die Zahl $54 (dez 84) steht bereits für den Namen 
der Variablen T. In der vorangehenden Adresse 1074 finden wir 
mit $80 (dez 128) das Änweisungswort END unseres Programmes 
VERBRAUCHI. Die drei folgenden 0-Markierungen geben das Ende 
des BASIC-Programmspeichers an (vgl. Abschnitt 3.5.5.3). 


Schritt 5: Den Monitor mit X verlassen 
wir verlassen den Maschinensprache-Monitor durch Tippen von 


X J/RET/ (eXit für verlassen) 
READY. 


Mit dem Promptzeichen READY. meldet sich wieder der BASIC-In- 
terpreter zurück. 
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3.5.6.2 Monitor-Befehl D an einem Beispiel 


Durch den Befehl D (für Register Display) können wir uns das 
Programm VERBRAUCHI in etwas anderer Form zeigen lassen: 


MONITOR u 182C 34 777 
.„1820D 18 1E BFL 1a4) 
FC 5R AC AR YR 5P .„ ı1B2ZF 008 BERK 
‚ Bann BR Da ma aa FS .„ı12u30 85 20 STIA FzA 
-D19809 „1832 4B 77 
.„ 1204 08 BRK .1833 Da BRK 
.„ 1881 BE 18 AR ASL $oRlo „198534 4A LSR 
. 1904 90 BRK „1835 19 28 EFL t1RA5F 
.„ 1905 88 DE'r . 1537 38 BEE 
. 195 20 54 Za JSR $2084 „1833 85 DE'r 
. 1609 B2 777 „1833 28 44 20 JSR $zadd 
„ 1B0R 28 36 30 JISR #3036 .„1935 EZ 777 
.„ 1m0D 00 BEK . 10230 za 31 320 JSR 33031 
„ 186E 2ZC 108 14 BIT $i14la .„ 1a 308 28 BMI #1062 
.„41Bill 00 ERK D1068 
. 1812 99 20 22 STAR 82228," . 18a 51 38 AND #340. ,' 
D .„ 1882 30 28 BMI 1084 
„ 1915 45 43 EÜR #49 . 1064 45 777 
„1817 4E 47 41 LSR $4147 „1865 4D ZE a8 EUR $au22 
.„ 18iAR 42 7 .„i1m6S5 7a 19 BvS $1B87’RA 
. 1891B 45 3A EOR $3A ice 3 277 
. 181D eu 47 45 ISR 84547 .„ 109eE 690 BRK 
„1028 46 4i LSR #41 .„ 1BeC 33 zu d4 5TA 84420," 
. inee 48 PHR „ı1BeEF 98 ERH 
„1023 52 777 .„1Br78 76 18 ROR #14, 
„1824 45 4E EOR +4E .„ 1972 46 SA LSR a8 
.„ 1026 45 20 EOR FR .„ 1074 80 727 
.„ 1025 4B 777 D1970 
. 1922 4Iı 22 08 EOR Fanz2 „1070 7&E 18 ROR $16,% 
. 10/5 46 Ba L5SR on 
Eingabe von "D": . 1 4 30 777 
jeweils weiterblättern. . 002 nn Ei 
Eingabe von "D Adresse": . 1077 2 BRK 
von der angegebenen Adresse . 1nra 54 SER 
an ausgeben. . 1073 600 BRK 
. 107R 56 YO TA ra 
.„ 107E 80 BRK 
zur Register-Anzeige: “ 10 ne DE 
- In $1001 steht $0E, also . 1BrF 4B Ei 
dezimal 14. Dies ist die . 1050 06 BRK 
.„ ı1n8l 893 7 


erste Adresse des Pro- 
gyramms VERBRAUCHI in 
Adresse 4097 (vgl. Auszug 
nächste Seite). 


- In $1005 steht $88 bzw. 
dezimal 136. Dies ist das 
Befehlswort bzw. das Token 
für LET. 
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Geben wir in BASIC im direkten Dialog die Anweisung 
FOR I=4097 TO 4216: PRINT PEEK (I);: NEXT I 


ein, erhalten wir die folgende ASCII-Codezahlen in dezimaler 
Angabe (die Zwischenzeilen mit der 'Übersetzung' wurden nach- 
träglich eingefügt): 


14 16 10 0 136 32 84 32 178 32 54 48 0 44 16 20 


10 LET T = 20 
0 153 32 34 69 73 78 71 65 66 69 58 32 71 69 70 
PRINT " E I N G A B E : G E F 
65 72 82 69 78 69 32 75 77 34 0 52 16 30 0 133 
A H R E N E K M " 30 INPUT 
32 75 0 74 16 40 0 136 32 68 32 178 32 49 48 48 
K 40 LET D = 1 0 0 
32 172 32 84 32 173 32 75 0 104 16 50 0 153 32 34 
* T / K 50 PRINT " 
65 8 83 71 65 66 69 58 32 76 73 84 69 82 4AT7 49 
A U S G A B E : L I T E R / 1 
48 48 32 75 77 34 0 112 16 60 0 153 32 68 0 118 
0 0 K M " 60 PRINT D 
16 70 0 128 0 0 0 84 
70 END T 


Das Programm VERBRAUCHI nimmt 119 Speicherplätze ein. Die drei 
Nullen am Ende markieren das Ende des BASIC-Programmspeichers. 
Die 84 in Adresse 4216 ($1078) gehört bereits zum Variablen- 
speicher (CHR$(84) für T als Variablenname). 

Die Angaben z wi sch en den Anweisungen stellen jeweils 
Zwei-Byte-Adressen dar, die auf die Adresse der nächsten An- 
weisung zeigen. Die Zwei-Byte-Adresse (112,16) vor der letzten 
PRINT-Anweisung z.B. zeigt auf den Speicherplatz 4208 (256*16+ 
112 ergibt 4096+112 ergibt 4208); in Adresse 4208 beginnt die 
nach "60 PRINT D" folgende Anweisung "70 END". Die Anweisungen 
werden durch diese Zwei-Byte-Adressen als Zeiger somit verket- 
tet. Man bezeichnet ein BASIC-Benutzerprogramm deshalb oft als 
verketterte List e (linked list). 


Vergleichen wir die obige dezimale Programmwiedergabe mit der 
hexadezimalen Wiedergabe, die wir durch den Monitor-Befehl D 
erhalten haben, erkennen wir dieselben Anweisungen. 


Wir haben vier Darstellungsformen eines BASIC-Programmes ken- 
nengelernt: 


- Ausgabe über BASIC mittels LIST (Codierung in BASIC direkt). 

- Ausgabe über BASIC mittels FOR ... PEEK ... NEXT (ASCII- 
Anzeige dezimal). 

- Ausgabe über Monitor mittels M (Speicher-Auszug mit ASCII- 
Anzeige hexadezimal). 

- Ausgabe über Monitor mittels D (Register-Anzeige). 


Die weitergehende Erläuterung der Register-Anzeige (Maschinen- 
sprache, Assembler) würde den Rahmen dieses Buches sprengen. 
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3.5.7 Schnelle BASIC-Programme 


Bei rechenintensiven Programmen wie z.B. Sortierprogrammen ist 
die Geschwindigkeit eines Programmlaufs von großer Bedeutung. 
Dazu drei Anmerkungen: 


1. Das 'normale' BASIC-Programm läuft schneller ab, wenn man 
REM-Anweisungen und Leerstellen wegläßt und die am häufigsten 
verwendeten Variablen am Programmanfang definiert (da die Va- 
riablentabelle immer sequentiell 'von oben nach unten' durch- 
sucht wird). Ebenso sollte man die am häufigsten aufgerufenen 
Unterprogramme an den Anfang stellen. 


2. Läßt man das Programm durch einen Compiler über- 
setzen, kann später bei jedem Programmlauf auf das bereits in 
Maschinenbefehle übersetzte Programm zurückgegriffen werden. 
Das Programm wird dadurch noch schneller. 


3. Ist auch das compilierte Programm zu langsam, kann man in 
Maschinensprache programmieren. Der im Commodore bereits ein- 
gebaute Monitor TEDMON erleichtert diese Arbeit ganz beträcht- 
lich. Häufig kombiniert man 1 und 3 wie folgt: Die rechenin- 
tensiven Routinen eines BASIC-Programmes schreibt man in Ma- 
schinensprache (Assembler), während die Ein- und Ausgabe in 
BASIC programmiert bleibt. 


langsam 


'Normales' BASIC-Benutzerprogramm, das durch 
einen Interpreter jeweils zur Ausführungszeit 
übersetzt wird 


BASIC-Benutzerprogramm 

- ohne REM-Anweisungen 

- oft verwendete Variablen am Programmanfang 
vereinbart 

- Unterprogramme stehen am Programmanfang 

- Routinen in Maschinensprache 


BASIC-Benutzerprogramm durch einen Compiler 
in einem zusätzlichen Übersetzungslauf 
einmalig umwandeln 


Benutzerprogramm in Assembler programmieren 





schnell 


Arbeitsgeschwindigkeit von Benutzerprogrammen 
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3.6 Tabellenverarbeitung (Felder, Arrays) 


Mit der Tabellenverarbeitung wenden wir uns einer komplexeren 
Datenstruktur zu, die als Tabelle, Feld, Array, Bereich, Liste 
oder Matrix/Vektor bezeichnet wird. 


3.6.1 Tabellenverarbeitung im Überblick 


In Abschnitt 1.3.2.2 hatten wir als wichtige Datenstruktur den 
Ar ra y kennengelernt. Den Array kann man sich als Regal mit 
mehreren Schubfächern als Elementen vorstellen. Je nach Inhalt 
der Fächer sind folgende Typen von Arrays zu unterscheiden: 


- Integer-Array: Ganzzahlen als Inhalt; Name endet mit dem "%" 
(Beispiel: M$) 

- Real-Array: Dezimalzahlen als Inhalt; Name ohne Typzeichen 
(Beispiel: M) 

- String-Array: Text als Inhalt; Name endet mit dem "$" 
(Beispiel: M$). 


D IM - Anweisung zum Dimensionieren: 

Eine am Programmbeginn stehende DIM-Anweisung legt den Array- 
Typ (durch "%", "$" bzw. ohne Typzeichen am Ende des Namens) 
sowie die Ausdehnung des Arrays fest. Die Anweisung DIM M(4) 
z.B. richtet einen Real-Array namens M mit 5 Elementen zur 
späteren Aufnahmen von Dezimalzahlen ein, wobei die Fächer mit 
M(O), M(1), M(2), M(3), M(4) durchnumeriert sind. Mit der An- 
weisung DIM M(N) werden somit N+1 Speicherplätze reserviert. 
In der Abbildung wird zu jedem Array-Typ ein Beispiel gegeben. 


Arrays (Felder, Bereiche) 


Integer-Array M$: Real-Array M: String-Array M$: 


DIM M(4) DIM M$(4) 
Eine 
Dimen- 
sion: 
Zwei HANS MAX EMIL 
Dimen- EVA KLAUS CARLA| 
sjionen: ERNST MARIA JULIA! 





MAX _ _LENA TILL | 





Drei Grundtypen von Arrays 
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3.6.2 Eindimensionale Tabellen 


Eine eindimensionale Tabelle kann man sich waagerecht als Zei- 
le ode r senkrecht als Spalte angeordnet vorstellen, also 
immer in einer Richtung ausgedehnt. Man spricht dabei auch von 
Feld, Bereich, Vektor, Liste und natürlich Array. Das Programm 
LAGERREGAL1 veranschaulicht uns diese Datenstruktur: 

Mit der Anweisung 


140 DIM R(7) 


vereinbaren wir ein Regal mit 8 Regalfächen und den Regalnum- 
mern 0,1,...,7. Das 0. Fach lassen wir unberücksichtigt (man 
reserviert es -wie später im Programm ABSATZTABELLE1- zumeist 
für ganz besondere Eintragungen). Über die Eingabeschleife von 
zeile 210 bis 240 geben wir mittels 230 INPUT R(I) der Reihe 
nach 7 Zahlen in die Fächer 1,2,..,7 ein; dies können z.B. die 
Absatzmengen an den Wochentagen sein. 

Die Variable I bezeichnet man als indizierende Variable oder 
Index variable, da sie das jeweilige Element des Arrays R 
anzeigt. R(I) bedeutet: I. Stelle von R, I. Element von R bzw. 
R an der Stelle I. I ist zugleich auch Laufvariable der zZäh- 
lerschleife 210 FOR I=1 TO 7. 

Über die Schleife von Zeile 280 bis 300 wird als Übersicht die 
jeweilige Fachnummer (Index) samt der im Fach abgelegten Menge 
(Inhalt des Array-Elements) ausgegeben, wobei jeder Fachinhalt 
nach M aufsummiert wird. 


Codierung zu Programm LAGERREGAL1: 


188 REM ======PROGRAMM LAGERREGAL1 

118 PRINT "LAGERREGAL ALS EINDIMENSIONALER ARRAY." 
128 : 

138 REM ======VEREINBARUNGSTEIL 

148 DIM R<?> : REM 7?-ELEMENTE-ARRAT ALS REGAL 


159 REM TI: INTEGER “LAUF-INDEAYARIABLE > 
168 REM M: REAL “SUMME DER 7 FRECHER> 
178 : 

158 REM ======ANWEISUNGSTEIL 


130 REM K#TASTATUREINGABE INS REGALE 
2a PRINT:PRINT "EINGABE IN REGALFRECHER: " 

218 FOR Is1 07° 

228 PRINT "MENGE FUER FACH" SI": 9"; 

238 INPUT R£ID 


248 NEAT I 

250 : 

26E REM #ERHVERARBEITUNG UHD AUSGABEFFRFRRREREERTENTENCHE 
zra PRINT : FRINT "FRÜCH: MENGE: " 


250 FOR I=1 TO 7? 

228 PRINT I,ECI5 : LET M=M+RCID 
398 NE#T I 

318 PRINT "5SUMME:",M 

328 END 
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Index: R(0) R(1) R(2) R(3) R(4) R(5) R(6) R(T) 


eh 1 Ba ar 


leer Fächer 1-7 mit je einer Zahl als Wert (Inhalt) 


Wert: 





Beispiele: 


- 140 DIM R(7) Reserviere 8 Fächer für einen Array R. 

- 149 LET R({2)=23 Weise die Zahl 23 ins 2. Regalfach zu. 

- 159 PRINT R(4) Gib die 88 als Wert des 4, Faches aus. 

- 169 INPUT R{(6) Weise die Tastatureingabe ins 6. Fach zu. 

- 230 INPUT R(I) Weise die Tastatureingabe ins I. Fach zu 
(wenn I den Wert 3 hat, dann ins 3. Fach). 

- 291 LET M=M+R(Z) Erhöhe M um den Wert des Z. Faches, 


Eindimensionale Tabelle bzw. Vektor R() als Beispiel 


Ausführung zu Programm LAGERREGAL]: 


LAGERREGAL ALS EINDIMENSIONALER ARRAY. 


EINGABE IN REGALFRECHER: 
MENGE FUER FACH 1 : 12 


MENGE FUER FACH 2 : 23 
MENGE FUER FACH 3 : 11 
MENGE FUER FACH 4 : 85 
MENGE FUER FACH 5 : 24 
MENGE FUER FACH 6 : 17 
MENGE FUER FACH 7 : 5 
FACH: MENGE : 

1 12 

& 23 

3 11 

4 38 

I 24 

6 17 

? I 
SUMME : 158 


Das folgende Programm VOKABELDRILLI weist wie LAGERREGAL] eine 
eindimensionale Tabelle auf. 

In den Fächern werden keine Zahlen aufbewahrt (Real-Array M), 
sondern Vokabeln als Texte (String-Arrays D$ und F$). Außer- 
dem richtet die Anweisung 150 DIM D$(A) keine feste Zahl von 
Fächern ein, sondern soviele, wie über die vorausgegangene An- 
weisung 140 INPUT A durch Tastatureingabe festgelegt wurde. 
In der Ausführung sind es A=3 Fächer für je drei deutsche und 
französische Vokabeln (Fächer 0 bleiben leer). Man bezeichnet 
dies auch als dynamisch e Dimensionierung. 
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D$ statisch dimensionieren: Anzahl der Elemente ist konstant 


——— oo. u m u u m: m ME dm HE: m HE: ME: Ham: Ham: A EM: HE EG CE AEG CE HE EEE CE HE CE HE TEE HET Hmm MET HN: mE m m 


150 DIM D$(12) Anzahl der Elemente ist bei jeder 
Programmausführung gleich 13. 


D$ dynamisch dimensionieren: Anzahl der Elemente ist variabel 


EEE En En ee En ee diem ie HE Hmm: me: Has: Emm: Hamm dm: Ham: Hamm Hamm HE HE: HE: HE A: +: m om EG: SEE MG ME FE EM RE FENG (EN: GE: SE CE: GGG: DEREN: GE: HE TE: GE FE FE: FEN TG TEE, m Hmm m EG: HE m ee 


140 INPUT "ANZAHL";A 1. Anzahl der Elemente über Tastatur 
während der Programmausführung 
festgelegt. 

150 DIM D$(A) 2. Array D$ erhält A+1 Elemente. 


Dimensionieren eines Arrays 


DRILL FRANZOESISCH-DEUTSCH. 

ANZAHL DER VOKABELN? 3 

PARRWEISE TIPPEN: I, F 

MANN, HOMME 

FRAU. FEMME 

KIND, ENFANT Ausführung zu Programm VOKABELDRILLI 


BEGINN DER UEBUNG: 
MANN <-HOMME 

GUT. 

FRAU <-DAMME 

FALSCH. FRAU -> FEMME 
KIND <-ENFANT 


GUT. 

ENDE. Codierung zu Programm VOKABELDRILL!I 
189 REM ======PROGRAMM YOKABELDRILLI 

15 PRINT "DRILL FRANZDESISCH-DEUTSCH. " 

1208 : 


138 REM ======VEREINBARUNGSTEIL 

14@ INPUT "ANZAHL DER Y“OKABELN"; A 

158 DIM D$CA> : REM STRING-ARRAY FUER ID 
168 DIM F$<A) : REM STRING-ARRAY FUER F 


= REM A$: STRING CJEWEILIGE ANTWORT? 
1980 REM ======ANWEISUNGSTEIL 


288 PRINT "PAAFWEISE TIFFEN: I. F" 

eia FOR I=s1 TJA 

220 INPUT DECOTIS,FEET> 

230 NEXT I 

248 FRINT : FRINT "BEGINH DER LIEBLING: " 
228 SCHELR 

z&d FÜR I=il TOR 

er8 PRINT DECI)," <-", : INPUT A 

Pt =15) IF A$=F$£.1I) THEM FEINT "GUT." : GOTO Sac 
E23 FRINT "FALSCH. ";:Deel2;" -7 "IFECI 
=00 NE#T I 

sla PEINT "ENDE." : ENI 
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3.6.3 Zweidimensionale Tabellen 


Eine zweidimensionale Tabelle dehnt sich waagerecht in Zeilen 
und senkrecht in Spalten aus. Am Beispiel einer durch die An- 
weisung 170 DIM R(2,S) dynamisch vereinbarten Tabelle R wol- 
len wir diese Datenstruktur im Programm ABSATZTABELLEI näher 
betrachten. | 

Den Array R(5,4) kann man sich als Regalschrank zu Ablage der 
Absatzmengen von 5 Kunden (=Zeilen 1 bis 5) in den 4 Quartalen 
(=Spalten 1 bis 4) vorstellen. Dabei hat Kunde 5 im 1. Jahres- 
quartal z.B. 50 Stk. gekauft und Kunde 3 im 3. Quartal 90 Stk. 
Die Tastatureingabe der 5%4=20 Absatzmengen vollzieht sich in 
den Zeilen 210-270 über zwei geschachtelte Zählerschleifen mit 


210 FOR I=1 TO 2 Äußere Schleife "Kunden 1,2,3,4,5' 
230 FOR J=1 TO S Innere Schleife "Quartale 1,2,3,4' 


250 INPUT R(I,J) Eingabe nach Fach Zeile I, Spalte J 
260 NEXT J Innere Schleife beenden 
270 NEXT I Äußere Schleife beenden 


viermaligem Durchlaufen der inneren Schleife für jeden Kunden. 
Das Verarbeiten von zweidimensionalen Tabellen (auch Matrizen 
genannt) führt stets zur Schleifenschachtelung . 

Die Fächer mit 0 als Index werden häufig zur Ablage besonderer 
Werte verwendet. In Programm ABSATZTABELLE1I werden in Zeile 0 
die Quartalssummen 150,300,450,600 abgelegt, also die 4 Spal- 
tensummen. In Spalte 0 finden wir die Kundenabsatzmengen 100, 
200,300,400,500 als die 5 Zeilensummen. Im Fach R(0,0) ist die 
Gesamtjahresabsatzmenge 1500 gespeichert. Das zeilen- wie auch 
das spaltenweise Summieren läuft wieder über Schleifenschach- 
telungen ab. 





DIM R(5,4) richtet 


EEE Er Er EEE Er EEE | 
Tabelle mit 6 Zeilen 


'R(0,0) | R(0,1) R(0,3) | R(0,4) 
1500 150 450 600 
- - (waagerecht) und 5 


R(1, Ic, ‚2 | Spalten (senkrecht) 
NR ein, also 30 Fächer, 


R(2, 0) Rz; 1) R(2, 2) R(2, 7 R(2, 4) 
200 20 40 60 80 
Ra, 0) Baar 2 Ra, 2) Ra, 3) R(3,4) 
300 90 120 

Rt, 0) Ra, 1) Ra, 2) R(A, 3) R(4, 4) | 
400 40 80 120 160 
R(5, o RS, I) | R(5,2) | R(5, 3) R(5, 4)| 
500 50 100 150 200 


Gaspalchert Er nur die Werte 1500,150,300,... ‚ nicht aber 
die Indices R(0,0),R(0,1),R(0,2),... als anzeigende Größen. 











R als Regalschrank. 


LET R(4,3)=120 weist 
dem Fach in Zeile 4 
und Spalte 3 die 120 
ZU. 


PRINT R(I,2) gibt 
Spalte 2 aus, wenn I 
von 0 bis 5 läuft. 





zweidimensionale Tabelle bzw. Matrix R(,) als Beispiel 
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Codierung zu Programm ABSATZTABELLEI: 


198 REM ======PROGRAMM ABSATZTABELLEI 
112 PRINT "TABELLENYERARBEITLNG: AESATZ-" 
120 PEINT "TABELLE ALS ZWEIDIMENSIONALER ARRAY." 


142 REM ======VEREINBARUNGSTEIL 
150 IHPUT "ANZAHL DER ZEILEN CWHARGERECHT>", Z 
165 INPUT "ANZAHL DEF SPALTEN CSENKRECHT)"; 5 


178 DIM Ri 2,5) : REM REGAL DYNAMISCH VEREINBART 
158 : 
130 REM ======ANWEISUNGSTEIL 


286 PRINT : PRINT "EINGABE ZEILENWEISE:" 

21a FOR I=1 TO Z 

228  FRINT "NRECHSTE ZEILE, NAECHSTER KUNDE: " 
238 FOR J=1 T0 5 


240 PRINT "KUNDE "51:", YWIERTELIAHR "15": 
est INFUT RC1.J2 

263 NEXT J 

278 NE#T I 

250 : 


230 REM ###ZEILENWEITSE SUMMIERENKEERFFERHEEEEEIENNOE 
>88 FÜR I =1 T02Z 

sia FOR J=s1 TO 5 

328 LET R(1.8> =KiL,@3+RST, 2 


338  NEAT J 
34 NEXT I 
350 : 


368 REM R&#GESAMTSUMMERISRERRRERSSRASRASKASRABISISIEEI ISIN 
378 FOR I=1 TO Z: LET RCD.D=RCD,DDd+RCL,OD : NEAT I 


320 REM ##%5PRALTENWEISE SUMMIEREN FERIEN 
498 FÜR J=1 TO 5 

4a FOR I=1 TO 2 

420 LET Ri. T=Rc), TD+EKT. 3 

430 NEAT I 

44a NEAT I 


46A PEINT : REM #&RUSGABE ALS LIEBERSICHTFERERREREN 
4’a FRINT "UEBERSICHT "525" -7 UND "5," 0 T:" 

452m FOR Isa TO Z 

430 FOR J=B TO S 

121 FRINT RC1,13," "; 

Sid NEAT J 

se6  FRIMT 

>58 NE#T I 

S4e FRINT "ENDE." : END 
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Ausführung zu Programm ABSATZTABELLEI: 


TABELLENVERARBEITUNG: ABSATZ- 
TABELLE ALS ZWEIDIMENSIONALER ARRAY. 
ANZAHL DER ZEILEN CWARGERECHT>? 5 
ANZAHL DER SPALTEN <SENKRECHT:? 4 


EINGABE ZEILENWEISE: 

NRECHSTE ZEILE, NAECHSTER KINDE: 
KUNDE 1 . VIERTELJRHR 1: 18 

KUNDE 1 , VIERTELJARHR 2: du 

KUNDE 1 , VIERTELIAHR 3: 38 

KUNDE 1 . WIERTEL/RHR 4 : 40 

NRECHSTE ZEILE, NRECHSTER KUNDE: 
KUNDE 2 , VIERTELIAHR 1: 28 

KUNDE 2 , VIERTELJAHR 2: 48 

KUNDE Z , VIERTELIAHR 3 : 68 

KUNDE 2 , YVIERTELIRHR 4 : 88 

NRAECHSTE ZEILE, NAECHSTER KUNDE: 
KUNDE 3 , VIERTELJARHR 1: 3a 

KUNDE 3 , VIERTELJAHR 2: 68 

KUNDE 3 , VIERTELJAHR 3: 38 

KUNDE 3 ‚ VIERTELJARHR 4 : 120 
NRECHSTE ZEILE, NAECHSTER KUNDE: 
KUNDE 4 , VIERTELIJARHR 1: 4a 

KUNDE 4 , YIERTELJAHR 2 : 58 

KUNDE 4 , VIERTELIJARHR 3 : 128 
KUNDE 4 , VIERTELJRHR 4 : 164 
NAELCHSTE ZEILE. NAECHSTER KUNDE: 
KUNDE 5 ‚, VIERTELJIAHR 1: 568 


KUNDE 5 ‚, VIERTELIAHR zZ : 1090 
KUNDE 5 , VIERTELIAHR 3 : 158 
KUNDE 5 , WIERTELIAHR 4 : 208 


VEBERSICHTT S -> UND 4 #: 
ısB8 150 200 459 600 
Im 18 208 a 4a 
2 20 so ho 
2 30 6 9a 12a 
aa 4 805 120 16H 
Ss 3 5 aa 15a 200 

ENDE ® 


Dreidimensiorna le Tabellen: 

Neben ein- und zweidimensionalen Tabellen lassen sich auch 
Tabellen mit mehr als zwei Ausdehnungen in Commodore-BASIC be- 
handeln. 

Hier ein Beispiel zu einem dreidimensionalen Array: 
Bundesligatabelle(n) mit 18 Zeilen (=18 Vereine), 7 Spalten 
(=7 Eintragungen je Verein wie Name, Tore, Punkte ...) und mit 
34 'Tiefen' (=34 Spieltagen). 
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Die Tab 


1:1 
der Dat iv 


e enverarbeitvung wird häufig mit 
e erarbe iturng wie folgt kombiniert: 
- Aus einer Datei werden Datensätze in den Hauptspeicher ein- 

gelesen und in einem eindimensionalen (Vektor) oder zweidi- 


mensionalen Array (Matrix) abgelegt. 


- Diese Datensätze können jetzt bequem im Direktzugriff bear- 
beitet werden. 'Direktzugriff' bedeutet, daß auf jedes Da- 
tenelement eines Arrays über den Index direkt 
zugegriffen werden kann. 


- Abschließend schreibt man die Daten aus dem (den) Array(s) 
wieder in die Disketten-Datei zurück. 


In Abschnitt 3.9 werden wir diese Verbindung von Tabelle bzw. 
Array einerseits und Datei bzw. File andererseits näher erklä- 
ren, 


3.7 Suchen, Sortieren, Mischen und Gruppieren von Daten 


3.7.1 Verfahren im Überblick 


Legt man einen größeren Datenbestand als Dat ei auf einem 
Externspeicher ab, dann stellen sich immer wieder Probleme des 
Suchens, Sortierens, Mischens sowie Gruppierens von Datensät- 

zen der Datei. Aus diesem Grunde bezeichnet man die vier Ver- 
fahren auch als Hilfmittel der Dateiverarbeitung. Ob man Sätze 
einer Datei sortiert oder Komponenten eines Arrays - am jewei- 
ligen zu demonstrierenden Verfahren ändert dies meist nichts. 
Aus diesem Grunde verarbeiten die folgenden Beispiele Arrays: 
die Abläufe können dabei übersichtlicher dargestellt werden. 


SUCHEN: Absatzmengen Mo - So: 45,100,95,78,90,76,80. 
An welchem Tag wurden 78 Stück abgesetzt? 


SORTIEREN: Absatzmengen in aufsteigende Sortierfolge 
45,76,78,80,90,95,100 bringen. 

MISCHEN: Mengen 45,76,78,80,90,95,100 von Filiale 1 und 
Mengen 30,47,55,57,61,80,103 von Filiale 2 zu 
30,45,47,55,57,61,76,78,80,80,90,95,100,103 
als Gesamtliste mischen. 


GRUPPIEREN: Gruppensummen MO-MI=240 und DO-S50=324 bilden. 


Vier Hilfsverfahren der Dateiverarbeitung 
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3.7.2 Suchverfahren 


Das einfachste Suchverfahren besteht darin, die Datei Satz für 
Satz in der Reihenfolge der Speicherung zu durchsuchen. Dieses 
se r ie 1 le Suchen ist typisch für die beiden Datenträger 
Band bzw. Kassette. Eine Adreßdatei nach ZIMMERMANN zu durch- 
suchen, kann ggf. sehr lange dauern. Im Programm SUCHBINAERI 
wird das b i nä re Suchen als schnelles Suchverfahren dar- 
gestellt. Dabei wird wie folgt vorgegangen: 


- Die Daten müssen stets sortiert und auf einem Direktzugriff- 
speicher vorliegen (hier die 7 Werte 45,76,78,80,90,95,100). 


- Das Wort 'binär bzw. zweiwertig' deutet an, daß man stets 
die Hälfte bildet. Um die Menge 90 zu suchen (siehe Ausfüh- 
rungsbeispiel), wird zunächst die Menge 80 als Mitte genon- 
men (7 Mengen, 3.5 ergibt gerundet die 80 als die 4. Menge). 


- Der Vergleich 80<90 zeigt, daß in der oberen Hälfte 90 - 100 
weiterzusuchen ist. Man nimmt wieder die Mitte und der Ver- 
gleich 95>90 zeigt, daß jetzt in der unteren Hälfte weiter- 
zusuchen ist. Da in dieser Hälfte nur noch der Suchbegriff 
90 steht, wird die Suche als '"positiv' beendet. 


Bei diesem kleinen Beispiel mag das binäre Suchen umständlich 
wirken. Das Leistungsvermögen dieses Suchverfahrens zeigt das 
folgende Beispiel: Um aus den über 60 Millionen Bundesbürgern 
e in en Namen herauszufinden, werden nur 26 Zugriffe benö- 
tigt (6 Zugriffe für 64 Bürger (2 hoch 6 gleich 64) und 26 Zu- 
griffe für über 60 Mio Bürger (2 hoch 26 gleich 67108864)). 


Ausführungen zu Programm SUCHBINAERI: 


“BINAERES SUCHEN“ 
ANZAHL DER DATEN? 3 
3 DATEH EINZELN EINTIFFEN: 


“BINRERES SLCHEN” 
ANZAHL DER DATEN? 7 
? DATEN EINZELN EINTIPPEN: 


45 4.5 

r6 6.33 

14- 11 

Sa | SCHLUESSEL ALS SUCHBEGRIFF 
an SUCHFROTOKOLL: 

35 UNTEN: 1 . MITTE: £& .„ OBEN 3 
19 UNTEN: 3 ,„ MITTE: 3 , OBEH 3 


SCHLUESSEL ALS SUCHBEGRIFF 
SUCHFROTOKOLL : 

UNTEN: 1 , MITTE: 4 „ CBEN 
UNTEN: 5 „ MITTE: & . OBEN 
UNTEN: 5 , MITTE: 5 . OBEN 


SUCHERFGEENIS: GEFUNDEN. 
ENDE. 


1 3 


SUCHERGEBNIS: NICHT GEFUNDEN. 
EN 
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zur Codierung von Programm SUCHBINAER]I: 

In der rechten Hälfte des jeweiligen Suchbereichs wird weiter- 
gesucht, indem man die Hälfte-Grenze UNTEN auf die MITTE vor- 
rückt (in Zeile 300). Die Variable GEFUNDEN dient der Ablauf- 
steuerung. Ist in Zeile 320 S gleich D(MITTE), dann wird '-1' 
als Vergleichsergebnis 'wahr' nach GEFUNDEN zugewiesen. Im an- 
deren Fall behält GEFUNDEN den Wert '0'. Die Suchschleife wird 
durch eine WHILE-Schleife gesteuert. 


Codierung zu Programm SUCHBINAERI: 


108 REM ======PRÜGRAMM SUCHBINARER1 

118 PRINT ""BINAERES SUCHEN” ALS SUCHMETHODE. " 
120 : 

130 REM e=====V/EREINBARUNGSTEIL 

140 REM A: INTEGER (ANZAHL DER DATEN: 


158 REM Di): ARRAY “MIT A DATEN ALS SUCHGEGENSTAND? 
168 REM UNTEN.MITTE.OBEN: INTEGER “GRENZEN: 
I78 REM GEFUNDEN: BOÖLERN ©-1 ODER 8 FUER ERGEBNIS? 
198 : 
130 REM ======ANWEISUNGSTEIL 
2a INPUT "ANZAHL DER DATEN";A : DIM DIA: 
218 PRINT R;" DATEN EINZELN EINTIPPEN: " 
228 FOR I=1 TOR: INFUT DEI>: NEXT I 
238 LET GEFUNDEN=9: UNTEN=1: DBEN=A 
249 INFUT "SCHLUESSEL ALS SUCHBEGRIFF"; S 
esa PRINT : PRINT "SUCHPROTOKOLL : " 
E51: 
z&i REM HERNICHT-REWETSENDE SLCHSCHLEIFERREFERERRR EEE 
er’e DU WHILE CUNTENZ=OREN> AHD CGEFUNDEN=B) 
288 LET MITTE=SINTCCUNTEN+ÖBENFZ) 
23M  FRINT "LINTEH:"SUNTEH;", MITTE:"SMITTE:", OBEN"SOBEN 
sag IF 5>D<MITTE> THEH LNTEN=MITTE+1 
318 IF 5S-D<CMITTE> THEN OBEN=MITTE-1 
329 LET GEFUNDEN = 5=DICMITTE) 
33a LOOP 
340 
358 REM #KKkZWEISEITIGE AUSHAHLEFRRERERFEEETIIOEEIEN 
369 FRINT:PREINT "SUCHERGEBNIS: "; 
3ra IF GEFUNDEN THEN FEINT "GEFUNDEN. ": 
ELSE PRINT "NICHT GEFUNDEN. " 
350 FRINT "ENDE." ' END 


“BINAERES SUCHEN’ ALS SLUCHMETHODE. 
ANZAHL DER DATEN? 5 

“ DATEN EINZELH EINTIPPEN: 

1206 

nad 

3aaa 

4000 

ABU 
SCHLUESSEL ALS SUCHBEGRIFF 
SUCHFROTOKULL : 
UNTEN: 1 ,„ MITTE: 3 , OBEM 5 
UNTEN: 1, MITTE: 1, OBEN 2 


SLCHERGEBNIS: GEFUNDEN. 
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Struktogramm zu Programm SUCHBINAER!I: 


Eingabe von A Daten in Array D() 


Anfangswerte zuweisen: GEFUNDEN=0, UNTEN=1, OBEN=A 


Eingabe der zu suchenden Zahl S 


Wiederhole, solange weder ein Wert gefunden noch das Ende 
der zu durchsuchenden Werte gefunden wurde 


MITTE = Mitte des aktuellen Suchintervalls 


Wenn S=D(MITTE), dann wird GEFUNDEN="wahr" (wahr=-1) 


nn 


Untere Grenze hochlegen: Obere Grenze herabsetzen: 
UNTEN=MITTE+1 OBEN=MITTE-1 


Ausgabe des Suchergebnisses 


















Suchbegriff S gefunden Suchbegrff nicht gefunden 


3.7.3 Sortierverfahren 


Die ersten Programme der Datenverarbeitung sollen Sortierpro- 
gramme gewesen sein. Dies unterstreicht die Bedeutung des Sor- 
tierens gerade für die kaufmännische DV. Es läßt aber auch er- 
ahnen, wie raffiniert heutige Sortieralgorithmen sein können. 


Sortieren ...: ... bedeutet: 


INTERN - EXTERN Daten im Internen Speicher oder 
(auch) auf einem Externen Speicher. 


NUMERISCH - STRING Daten als Zahlen (1 < 4 «< 8,5) 
oder als Text ($ < DM < LIRE). 


DATEN - ADRESSEN Daten selbst sortieren oder nur 
deren Adressen bzw. Speicherplätze. 


EINFACH - KOMPLEX Einfache Sortierverfahren wie Aus- 
wahl, Bubble Sort, Einfügen oder 
komplexe Verfahren wie Sortieren 
durch Mischen, Binär-Baum-Sort, 
Quick Sort mittels Rekursion. 


Vier Begriffspaare zum Sortieren 
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3.7.3.1 Zahlen unmittelbar sortieren 


'"Unmittelbar' heißt, daß wir die zu sortierenden Zahlen selbst 
umordnen und nicht - wie im nächsten Abschnitt - ihre Plätze. 
Im folgenden Programm SORTDATENI wird das Sortierverfahren des 
"Austausches nach Auswahl" angewendet. 


PROBLEM: 6 Zahlen in Array D() sortieren. 


ABLAUF: 
1) Suche das Minimum in D() und speichere es in MINSTELLE 
2) Tausche D(I) mit D(MINSTELLE) aus. 
3) Weiter mit 1), aber jetzt mit D(I+1) beginnen. 


WERTE IN D(): 


102 101 109 106 104 105 Beginn: In D() 6 Zahlen 
103- I, 22 109 106 104 105 I=1: Tausch 102-101 

101 102 I 109 106 104 105 I=2: Kein Tausch 

101 102 104 I 106 109 105 I=3: Tausch 109 - 104 
101 102 104 105 I 109 106 I=4: Tausch 105 - 106 
101 102 104 105 106 I 109 I=5: Tausch 109 - 106 


Sortierverfahren "Austausch nach Auswahl" ein einem Beispiel 


Die Markierung "I" soll anzeigen, daß bei jedem Durchlauf mit 
D(I+1) begonnen wird, daß D() also verkürzt wird; programmiert 
wird das Verkürzen durch den Anfangswert I+1 in der Anweisung 


190 FOR J = I+1 TO6. 


Das Tauschen von D(I) mit D(MINSTELLE) vollzieht sich über die 
Methode des Dreieckstausches *. Dabei verwenden 
wir die Stelle 0 des Arrays D() als Hilfsvariable. 


Austausch von A und B Austausch von D(I) und D(MINSTELLE) 
über zan1e H: über Hilfsvariable D(0): 
2 
A ERBEN, D( I]) & — 1 (MINSTELLE) 
6% En 3 
D(0) 
100 LETH = A 220 LET D(0) = D(I) 
110 LEETA=B 221 LET D(I) = D(MINSTELLE) 
120 LETB=H 222 LET D(MINSTELLE) = D(0) 


Methode des Dreieckstausches an zwei Beispielen 


Soll anstelle des Minimums das Max i m um gesucht werden, 
ist die Abfrage D(J)<D(MINSTELLE) durch D(J)>D(MAXSTELLE) zu 
ersetzen. 
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Struktogramm zu Programm SORTDATENI: 
Eingabe: 6 Zahlen nach D() aus DATA-Zeile proyrammintern 


Für I von 1 bis 5 wiederhole 


MINSTELLE = I als vorläufiges Minimum festlegen 


Für J von (I+1) bis 6 wiederhole 


MINSTELLE = J als 
neues Minimum 


Austausch von D(I) und D(MINSTELLE) mittels 
Dreieckstausch über D(0) als Hilfsvariable: 
D(0) = D(I) 

D(I) = D(MINSTELLE) 
D(MINSTELLE) = D(D) 





Codierung zu Programm SORTDATENI: 


190 REM ======PRÜGRAMM SORTDATENI 

118 PRINT "SORTIEREN DURCH AUSTAUSCH NACH RUSWAHL" 
126 PRINT "SORTIEREN DER DATEN SELBST}." 

134 FRINT "DATEN: " 

14a FÜR I=1 TO 6: READ DEI: FRINT DII:s: NEXT I 
150 DATA 182,181,109,196,104.105 


178 PRINT: PRINT :PRINT"SORTIERPROTOKOLL: " 

158 FÜR I=1 TO 5 

152 FOR Y=1 TO 6: PRINT DeY>;: NEXT Y: PRINT 
2A LET MINSTELLE=1 

21 FOR J=I+ TO 

228 IF DEJ5<CDEMINSTELLE? THEN MINSTELLE=J 
238  NEAT J 

240 LET IKB>=DeI> : LET DEIP=DIMINSTELLE> 
25d LET DCMINSTELLE)=DIB) 

268 NEHT I 


250 FRINT : PRINT "DATEN SORTIERT: " 
eg FOR I=1 TO 8: FRINT DKTS;: NEXT I 
3aa FRINT: FRINT "ENDE.": END 
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Ausführung zu Programm SORTDATEN!: 


SORTIEREN DURCH AUSTAUSCH NACH AUSWAHL 
(SORTIEREN DER DATEN SELBST?. 


DATEN: 
102 181 189 106 164 185 
SORTIERPROTOKOLL : 


182 101 189 186 104 105 
i8i 102 189 186 194 105 
181 102 189 186 104 185 
181 182 184 186 109 185 
181 182 194 165 189 1096 


DATEN SORTIERT: 
161 1082 194 105 106 1089 
ENDE. 


3.7.3.2 Zahlen über Zeiger sortieren 


Im Programm SORTDATENI! haben wir sechs Zahlen selbst mehrfach 
umgeordnet. Bei umfangreicheren Datenbeständen kann es günsti- 
ger sein, nur die Speicherplätze dieser Zahlen über Zeigerva- 
riablen bzw. Po int er zu sortieren, die Zahlen selbst 
aber unbewegt zu lassen. Das folgende Programm SORTZEIGERI de- 
monstriert dies mit denselben Daten und demselben Sortierver- 
fahren wie in Programm SORTDATENI: 


Unsortierter Array: Sortierter Array: 
D(1) = 102 D(1} = 101 
D(2) = 101 D(2) = 102 
D(3) = 109 Unmittelbares D(3) = 104 
DEE 2 es entire, TE E05 
D(5) = 104 Sortieren D(5) = 106 
D(6) = 105 D(6) = 109 

Sortierter Sortierter Array 

Zeiger-Array: (über Zeiger): 
LIT = 2 D(Z(i1)) = 101 
212) = 1 D(2(2)}) = 102 
2(3) = 5 Sortieren über D{2(3)) = 104 
z2(4) = 6 MT Te I ER ISEIEN 
(5) = 4 Zeiger indirekt D(z2(5)) = 106 
ZONE 3 D(Z(6)) = 109 


Unmittelbares Sortieren sowie Sortieren über Zeiger 
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Codierung zu Programm SORTZEIGER!I: 


1868 REM ======PROGEAMM SORTZEIGERI 

118 PRINT "SORTIEREN DURCH AUSTAUSCH NACH RUSWAHL" 
128 PRINT "(SORTIEREN UEBER ZEIGER INDIREKT}. " 

139 PRINT "DATEN: " 

148 FOR I=1 TO 6: RERD DII>: PRINT D<II>;: NEAT I 
158 DATR 182,181,109, 106,104, 105 

168 PRINT : PRINT "ZEIGER:" 

ie. FOR I=1 TO 6: LET Z£T>=I: PRINT Z£ID;: NEXT I 
138 PRINT: PRINT: PRINT"SORTIERPROTOKOLL : " 

258 FÜR I=1 TO 5 

210 FOR Y=1 TO 6: PRINT ZiY55: NEXT 7: PRINT 
228 LET MINSTELLE=I 

230 FOR J=I+1 TD 6 

240 IF DEIICDEZEMINS TELLE>> THEN MINSTELLE=J 
258  NEAT J 

268 LET Zi@9=211I> : LET ZiI>=ZiMINSTELLE? 

278 LET ZCMINSTELLE?=ZED) 

280 NEXT I 

2908 : 

388 PRINT : PRINT "ZEIGER SORTIERT: " 

3ia FOR I=1 TO 6: PRINT ZCIl>,;: NEAT I 

328 PRINT : PRINT "DATEN SORTIERT: " 

330 FOR I=si TO 6: PRINT DIZCIP3,: NEAT I 

340 PRINT: PRINT "ENDE.": END 


Ausführung zu Programm SORTZEIGER!: 


SORTIEREN DURCH AUSTAUSCH NACH AUSWAHL 
(SORTIEREN UEBER ZEIGER INDIREKT}. 
DATEN: 
ie2 181 103 196 104 1605 
ZEIGER: 
1234 5% 


SORTIERPROTÜOKOLL : 
12 3 
e 13 
2 13 
2 15 
2 15 

ZEIGER SORTIERT: 
2 156 4 


DATEN SORTIERT: 
isı 1082 104 105 106 1899 


DALAHn 
GI CICHN EN 
RAN 


6) 


Datenflußplan zu Programm SORTDATEN!: 


a |— 9 —L\ 


Tastatureingabe Sortieren Druckausgabe 
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3.7.3.3 Strings unmittelbar sortieren 


Das Programm SORTDATEN2 beinhaltet das Sortieren von Strings 
anhand des "Sortierens durch paarweisen Austausch", das häufig 
auch Bubble Sort genannt wird. Die zu sortierenden Namen sind 
im String-Array N$() abgelegt und werden paarweise verglichen, 
um bei falscher Sortierfolge ausgetauscht zu werden. Dazu das 
erste Ausführungsbeispiel zu SORTDATEN2: MAX<MARIA falsch und 
Austausch, MAX<TILLMANN wahr, TILLMANN<LENA falsch und Aus- 
tausch. Jetzt MARIA,MAX,LENA,TILLMANN gespeichert. Wie Blasen 
(=bubble) werden Worte "hochgesprudelt', d.h. an das Ende des 
Arrays N$() gerückt. 

Die Variable FLAG steuert als Flagge den Sortierlauf innerhalb 
einer WHILE-Schleife: "Flagge oben bzw. FLAG=-1' heißt "Wort 
ist ausgetauscht worden'. Die Schleife wird solange durchlau- 
fen, bis FLAG unten bleibt. 'Flagge unten bzw. FLAG=0' bedeu- 
tet "Fertig sortiert, da kein Wort mehr ausgetauscht wurde'. 


Wie die zweite Ausführung zu SORTDATEN2 zeigt, kann Text mit 
beliebigen Zeichen sortiert werden. Aus welchem Grunde kommt 
z.B. der String "%-SAETZE" vor dem String "126 DM"? Da im 
ASCII die Codezahl 37 für "$" vor der Codezahl 49 für "1" 
steht. 


Codierung zu Programm SORTDATEN2: 


188 REM ======PROGRAMM SORTDATENZ 

118 PRINT "SORTIEREN DURCH PAHRWEISEN AUSTAUSCH" 
128 PRINT "ALS "BUBBLE SORT” (SORTIEREN YON TEAT," 
138 PRINT "ZEICHENKETTEN BZW. STRINGS DIREKT?." 


15® REM ======VEREINBARUNGSTEIL 
160 REM N$CA?, A A NAMEN IN STRING-ARRAY N$ 


178 REM FLAG: WAHRHEITSWERT MIT -1=50RTIERT 
158 REM I,Y: LAUFYARIABLEN 

130 : 

226 REM ======ANWEISUNGSTEIL 


218 PRINT : INPUT "ANZAHL DER NAMEN"; A 


238 PRINT A;" NAMEN EINZELN TIPPEN: " 

248 FOR I=1 TO RAR: INFUT N$CI>: NEAT I 

258 PRINT: PRINT "KONTROLLAUSGABE ZUM SORTIERVORGANG: " 
258 LET FLAG=-1 


288 DO WHILE FLAG 

298 LET FLAG=O 

388 FOR Y=1 TO AR: PRINT N3«CY3;" "5: NEAT T: PRINT 

3loe FOR I=i TO <A-1) 

328 IF N$CID<=N$CI+1> THEN 358: ELSE 330 

330 LET H$=N$CID: LET N$CID=N$CI+1>: LET N$CI+L)=H$ 
340 LET FLAG=-1 


3508 NEXT I 
360 LOOP 
370 : 


388 PRINT "ENDE.": END 
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Ausführungen zu Programm SORTDATEN2: 


SORTIEREN DURCH PARRWEISEN AUSTAUSCH 
ALS “BUBBLE SORT’ <SORTIEREN YON TEXT, 
ZEICHENKETTEN BZW. STRINGS DIREKT). 


ANZAHL DER NAMEN? 5 
> NAMEN EINZELN TIPPEN: 
iz6e DM 
FILTER MIT 
$26. 0% 
25598 LIRE 
#-SRETZE 


KONTRÜLLAUSGABE ZUM SORTIERVORGANG: 

126 DM FILTER MIT $26.58 25588 LIRE #-SRETZE 
126 DM $26.58 25508 LIRE #-5SAETZE FILTER MIT 
$26.98 126 DM %-SRETZE 25598 LIRE FILTER MIT 
ee “-SAETZE 126 DM 25508 LIRE FILTER MIT 


ANZAHL DER NAMEN? 4 
4 NAMEN EINZELN TIPPEN: 
MAA 
MARIA 
TILLMANN 
LEHA 


KONTROLLRUSGABE ZUM SORTIERVORGANG: 
MAs MARIA TILLMANN LENA 

MARIA MA LENA TILLMANN 

MARIA LENA MA TILLMANN 

are MARIA MAX TILLMANH 


Struktogramm zu Programm SORTDATEN2: 


Eingabe: Anzahl A und dann A Wörter in den Array N$() 


Flagge F=0 setzen, also senken 


Für I von 1 bis (A-1) wiederhole 


DD» N$(I) <= N$(I+1) — 


Austausch vornehmen 
von N$(I) und a 

./. 
Flagge Fat neben F=1 heben 


Wiederhole, bis F=0 bleibt, d.h. bis kein Austausch mehr 


Ausgabe der A in N$ abgelegten Wörter aufsteigend sortiert 
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3.7.4 Zwei Arrays mischen 


Mischen heißt, Daten unter Berücksichtigung ihrer Sortierfolge 
zu einer Datenstruktur zusammenzufügen. Im Beispielpro- 
gramm MISCHDATENI! wird der 5-Elemente-Array X() und der 4-Ele- 
mente-Array Y() zum 9-Elemente-Array Z() gemischt. Ein Problem 
beim Mischen besteht in der Ende-Verarbeitung, wenn ein Array 
bereits vollständig eingemischt ist. In MISCHDATEN! wird dann 
in ein zusätzliches 6. (für X) bzw. 5. Element (für Y) die 999 
als große Zahl gespeichert, um den Array für das weitere Ein- 
mischen zu sperren. Die Anweisung dazu heißt: 


330 LET X(6) = ABS((I=6) * 999 ) 


Hat I den Wert 6, so wird der Vergleich I=-6? zu -i (also wahr) 
und X(6) erhält den Wert ABS(999*-1), d.h. 999. Für die übri- 
gen Werte von I bleibt X(6) Null, da der Vergleich I=6? zu 0 
(also unwahr) führt. 


Die WHILE-Schleife des Programms wird durch WEITER gesteuert. 
Als boolesche Variable (vgl. Abschnitt 3.2.3) nimmt WEITER nur 
die beiden Werte 0 (für unwahr) und -1 (für wahr) an. Inner- 
halb der abweisenden Schleife ist eine zweiseitige Auswahl ge- 
schachtelt, die durch die Anweisung IF-THEN-ELSE kontrolliert 
wird. 


Datenflußplan zu MISCHDATENI1: Struktogramm zu MISCHDATENI: 


Eingabeteil 


Wiederhole solange ungleich 999 


Br 


Ausgabeteil 


Ausführung zu Programm MISCHDATEN]: 


Bestand Bestand 
1: X(5) 2: Y(4) 


[|] [|] 
N _7 










Gemischter Bestand 2(9) 





ARKATS % UND 7 IM EINEN ARRAY Z MISCHEN, 


DATENBETAND 1: 
id 20 30 4a 58 
DATENBESTAND 2: 
13 20 25 495 
DATENBESTRENDE 1 UND Z GEMISCHT: 
ia 15 2a 20 25 3a 498 45 56 
ENDE. 
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Codierung zu Programm MISCHDATENI: 


198 REM ======PROGEAMM MISCHDATENI 
118 PRINT "ARRAYS % UND Y IN EINEN ARRAY Z MISCHEN. " 


130 REM ======VEREINBARUNGSTEIL 

1458 DIM AcC6>: REM DATENBESTAND 1 

158 DIM YcC5>: REM DATENBESTAND 2 

168 DIM Z(9): REM GEMISCHTER BESTAND 

i7a REM WEITER :WAHRHEITSWERT <-1=WEITERMISCHEN? 


198 REM ======ANWEISUNGSTEIL 

288 PRINT: PRINT "DATENBETAND 1:" 

218 FOR I=1 TO 5: RERD XCI>: PRINT ACI>;: NEXT I 
228 DATA 18,29,39,48,59 : REM DATENBESTAND 1 

2308 PRINT: PRINT "DATENBESTAND 2:" 

248 FOR I=1 TO 4: RERD YEI>: PRINT YCID;: NEXT I 
258 DATA 15,20,25,.45: REM DATENBESTAND 2 

264 LET I=1: LET J=1: LET Kal 

278 LET WEITER=-1 


230 REM ##%* SCHLEIFENBEGINN ZUM MISCHEN Eshakshlk 
388 DO WHILE WEITER 

s3ia IF acTd<=tc)>) THEN 329: ELSE 359 

328 LET ZIKISKLT>: LET I=Iti 

338 LET AC6>=ABSCC1=678939) 

344  GOTD 370 

358 LET Zik)=TCJ3: LET J=J+1 

368 LET Y(5S>=ABSCc 125774999) 

378 LET Kakti 

338 LET WEITER=NOTCCKLII=993) AND (ri J5=999)) 

398 LOOP 

496 REM K#%k SCHLEIFENENDE HAB 


420 PRINT: PRINT "DATENBESTAENDE 1 UND 2 GEMISCHT: " 
438 FOR K=1 TO 9: PRINT ZCK);: NEXT K 
448 PRINT: PRINT "ENDE.": END 


3.7.5 Gruppieren von Daten (Gruppenwechsel) 


Das Programm GRUPPDATENI erwartet über Tastatur die Mengen- 
angaben zu Aufträgen, um bei Wechsel der Auftragsnummer deren 
Summe auszugeben. Aufträge mit gleicher Nummer werden zu Grup- 
pen zusammengefaßt, um bei Gruppenwechsel deren Summe auszuge- 
ben. Solche Probleme bezeichnet man als Verdichten 
von Daten oder als GruppenwechseL|l. Wie wird der 
Gruppenwechsel in GRUPPDATENI festgestellt? Wir unterscheiden 
A2 für "Auftrag neu' und Al für "Auftrag alt', um für (A2<>Al) 
dann die jeweils nach SI aufaddierte Summe auszugeben und mit 
310 LET S1=0 : LET Al=A2 zum nächsten Datensatz überzugehen. 
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Codierung zu Programm GRUPPDATENI: 


188 REM ======PROGRAMM GRUFPDATENI 
118 PRINT "EINSTUFIGER GRUFPENWECHSEL. " 
120 : 


130 REM ======YEREINBRUNGSTEIL 

148 REM A2,M: DATENSATZ MIT AUFTRAG, MENGE 
159 REM A1: AUFTRAG "ALT 

160 REM S1: SUMME VON AUFTRAGSMENGEN 
Ir8 : 

158 REM ======ANWEISUNGSTEIL 

126 REM #%*%* ERSTER SATZ Kkakakaklalslkilskckikäck 
208 INPUT "AUFTRAG, MENGE"; A2,M 

218 LET AI =R2 

220 : 

230 DO WHILE A2<>B 

2489 REM #%% GLEICHE GRUPFE kick 
258 DO WHILE AZ=fil 

254 LET SI =5S1 + M 

278 INPUT "AUFTRAG, MENGE"; A2.,M 

258  LOOP 

238 REM %*%#%* GRUPFENWECHSEL Halelskleliicikk 
38a  FRINT A1l;" MIT GRUPFPENSUMME ";$1 
sla LET Si=8: LET Al=R2 

328 LOOP 

338 PRINT "ENDE." :END 


Ausführung zu Programm GRUPPDATENI: 


EINSTLIFIGER GRUPPENWECHSEL . 
AUFTRAG, MENGE? 221 , 18 
AUFTRAG, MENGE? 221 , 35 
AUFTRAG, MENGE? 221 , 14 
RUFTRAG, MENGE? 229 , 3 
221 MIT GRUPPENSUMME 59 
AUFTRAG, MENGE? 230 , 7a 
223 MIT GRUPPENSUMME 3 
AUFTRAG, MENGE? 230 ,„ 55 
AUFTRAG, MENGE? BB, 98 

2598 MIT GRUPPENSUMME 125 
ENDE. 


Im Programm GRUPPDATEN]I liegt ein einstufiger Gruppenwechsel 
vor. Gruppenwechsel können auch mehrstufiog sein. 
Dazu dieses Beispiel: Es wird nicht nur nach Aufträgen glei- 
cher Nummer gruppiert (=Untergruppe), sondern zusätzlich noch 
nach Vertreternummern (=Hauptgruppe). Auch ein solcher Haupt- 
gruppenwechsel wird durch den Vergleich (V2<>V1) bzw. "Vertre- 
ter neu <> Vertreter alt' festgestellt. 


Verfahren des Suchens, Mischens, Sortierens und Gruppierens 
(Gruppenwechsel) von Daten werden häufig im Zusammenhang mit 
der Verarbeitung großer Datenbestände in Dateien bzw. 
Files angewendet. Der Dateiverarbeitung 
wenden wir uns im Abschnitt 3.9 zu. 
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3.8 Programmerstellung 


3.8.1 Programme eingeben 
3.8.1.1 


Auf der Tastatur des Commodore sind sechs Tastentypen zu 


Belegung der Tasten 


un- 


terscheiden (vgl. auch Abschnitt 2.1): 


an Bwene- 


Mit dem folgenden Programm 


. Normale Tasten (z.B. T und 6) 

. Sondertasten (z.B. /RET/ und /CLEAR-HOME/) 
. Cursorsteuerung (z.B. />/) 

. Grafiktasten (z.B. 'Herz') 

. Farbtasten (z.B. /CTRL/+1 für 'schwarz') 
. Funktionstasten (z.B. /F2/ für DLOAD) 


TASTENBELEGUNGI können wir testen, 


welche ASCII-Codezahl der jeweiligen Taste bzw. Tastenkombina- 
tion zugeordnet ist. 


Ausführung zu Programm TASTENBELEGUNG!: 
TASTENBELEGUNG <ASCII> TESTEN. 


TASTE DRUECKEN 


T: 


5: 


“(un 


QOD+ IL DODD2 20 


94 1- 
4 


a = 

ON DARWMR 

ne ADD 
[o)) 


_n 


IN 00 
{a fi 


I 
= 


„D=ENDE>: 


Normale Tasten 

Taste T mit ASCII-Codezahl 84: CHR$(84) ergibt T 
Taste 6: ASC('"6") ergibt 54 

Sondertasten 

Taste /RET/: CHR$(13) 

Tastenkombination /SHIFT/+/DEL-INST/ mit CHR$(148) 
/SHIFT/+/HOME-CLEAR/ für 'Bildschirm löschen' 
/HOME-CLEAR/ für "Cursor nach oben links' 


Cursorsteuerung 

"Cursor um eine Zeile nach oben' 

'Cursor nach unten' 

"Cursor um eine Stelle nach rechts! 

'Cursor nach links' 

Grafiktasten (Dreifachbelegung von Taste 5) 

Taste S mit CHR$(83) 

Kombination /SHIFT/+S: 'Herz rechts über Taste S' 
Kombination /C</+S: 'Zeichen links über Taste S' 
Farbtasten (Vierfachbelegung von Taste 1) 

Taste 1 mit CHR$(49) 
Kombination /SHIFT/+1: 
Kombination /CTRL/+1: 
Kombination /C</+1: 
Funktionstasten 

Taste /F1/ mit Standardbelegung 'GRAPHIC' 

Taste /SHIFT/+/F7/ mit belegung 'LIST+CHR$(13)' 


'Ausrufungszeichen !' 
'Schwarz (BLK): steht oben' 
"Orange (ORNG): steht unten' 


L fd) 

I: 73 : 13 

S:.83 a: 43 
T: 84 ENTE. 
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zum Testen der Tastenbelegung mit Progamm TASTENBELEGUNGI ein 
Tip: Durch Eingabe von /CTRL/+2 verschwindet der Cursor, weil 
die weiße Farbe gewählt wurde. 


Codierung zu Programm TASTENBELEGUNGI : 


194 REM ======PROGRAMM TASTENBELEGUNGI 
118 PRINT "TASTENBELEGUNG (ASCIID TESTEN." 
128 PRINT "TASTE DRUECKEN (ÜO=ENDE>: " 


132 DO 
148 GET E$: IF E$="" THEN 140 
150 PRINT E$:": ";ASCIES) 


164 LOOP LINTIL E$=CHRSC4S) 
17@ FRINT "ENDE.": END 


3.8.1.2 Funktionstastenbelegung mit KEY 


Durch Eingabe der Anweisung KEY wird die augenblickliche Be- 
legung der acht Funktionstasten /F1/ bis /F8/ gezeigt: 


Commodore 16 und 116: Commodore plus/4: 

KEY /RET/ KEY 1,"SYS1525: 3-PLUS-1" 
KEY 1,"GRAPHIC" ... sonst wie C-16 ... 
KEY 2,"DLOAD"+CHR$ (34) ... 


KEY 3,"DIRECTORY"+CHR$(13) 

KEY 4,"SCNCLR"+CHR$(13) 

KEY 5,"DSAVE"+CHR$(34) CHR$(34): Zeichen " am Ende 
KEY 6,"RUN"+CHR$(13) CHR$(13): Zeichen /RET/ am Ende 
KEY 7,"LIST"+CHR$(13) 

KEY 8,"HELP"+CHR$(13) 


Diese jeweils bei Einschalten des Commodore standardmäßige Be- 
legung der Funktionstasten ist über KEY frei programmierbar, 
d.h. mit Funktionen, Anweisungen oder Texten so zu belegen, 
daß sie auf Tastendruck ausgeführt werden können. Die Eingabe 


KEY 1,"DIRECTORY+CHR$(34)+"*=PRG"+CHR$(34) /RET/ 


bewirkt, daß /F1/ nur die Programme (PRG) von Diskette listet, 
nicht aber die sequentiellen Dateien (SEO), 
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3.8.1.3 Tastaturabfrage mit GETKEY 


Mit der Anweisung GETKEY können wir einzelne Zeichen abfragen. 
Im folgenden Programmbeispiel 


500 PRINT "TASTE /ESC/ DRUECKEN ZUR PROGRAMMFORTSETZUNG"" 
510 GETKEY E$ 

520 IF E$<>CHR$(27) THEN 510 

530 PRINT "PROGRAMMFORTSETZUNG ..." 


wird das Programm erst dann fortgesetzt, wenn die /ESC/-Taste 
gedrückt wurde. Wir haben somit die /ESC/-Taste mit der Funk- 
tion 'Programmfortsetzung' belegt. Statt 510 GETKEY E$ kann 
man auch eine Warteschleife mit 510 GET E$: IF E$="" THEN 510 
schreiben. 


Das Programm ZEIT-TESTI demonstriert, wie die Anweisung GETKEY 
zum Zeitnehmen verwendet werden kann. Die Systemvariable TI 
wird alle 1/60-Sekunde um 1 erhöht. 


Codierung und Ausführung zu Programm ZEIT-TESTI: 


108 REM ======PROGRAMM ZEIT-TESTI 
118 PRINT "TEST DER ZEITYARIABLEN "TI." 
120: 


138 PRINT "ZEIT-START AUF TASTENDRLICK :" 
148 REM #%#EINGABE MITTELS GETKETRERERSEN 
158  GETKEY E$ 

160 LET UHR=TI 

178 PRINT "... LRAEUFT BIS TASTE „.." 

1520 REM KXEINGABESCHLEIFE MIT DO-LNTILCK 
190 DO 

2zua GET E$ 

218 LOOP LINTIL E$<>"" 

22R LET UHR=TI-UHR : REM VERGANGENE ZEIT 
238 PRINT "GESTOFPTE ZEIT:"SUHR/EB "SEC." 
248 PRINT "ENDE.": ENT 


TEST DER ZEITYARIABLEN TI‘. 
ZEIT-START AUF TASTENDRUCK.: 


TEST DER ZEITYARIABLEN ‘TI’. 
ZEIT-START AUF TASTENDRIJCK: 
TEST DER ZEITYARIABLEN TI‘. 
ZEIT-START AUF TASTENDRUCK: 


5 
en. LAEUFT BIS TASTE ... 


5 
GESTOPFTE ZEIT: „38 SEC. 
EN 
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3.8.2 Programme testen 
3.8.2.1 Fehlerbereich anzeigen über /HELP/-Taste 


Nach Eingabe und Ausführung der Anweisung 10 LET A+B=10 er- 
scheint am Bildschirm eine Fehlermeldung: 


10 LET A+B=10 /RET/ 
RUN /RET/ 
SYNTAX ERROR IN 10 . 


Drücken wir jetzt die /HELP/-Taste (Funktionstaste /F4/: bei 
Commodore 116 und plus/4 oben, beim Commodore 16 rechts ange- 
ordnet), beginnt die fehlerhafte Anweisung LET A+B=3 im sel- 
ben Takt wie der Cursor zu blinken. Tippen wir 


PRINT ER /RET/ 
11 


wird zusätzlich die 11 als Fehlernummer angezeigt. 


3.8.2.2 Trace-Lauf mit TRON/TROFF 


Es gibt zwei Arten von Programmtests: 

Auf der einen Seite den Schreibtischtest bzw. 
'Trockentest', bei dem der Programmlauf gedanklich ohne Compu- 
ter durchgespielt wird und bei dem man dabei die Variablenwer- 
te "auf einem Stück Papier' notiert. 

Auf der anderen Seite den Computertest, bei dem man das Pro- 
gramm mit Testwerten laufen läßt. Wir wenden uns dem Computer- 
test zu. 


Nach Beendigung des Testlaufes kann man sich die Variablenwer- 
te (z.B. die Werte von D und D$) zeigen lassen, in dem man in 
Direktausführung 

PRINT D, D$ 
eintippt. Soll während der Ausführung angehalten werden, damit 
die Variablenwerte kontrolliert werden können, kann man STOP- 
Anweisungen einfügen. 


171 STOP | 
180 ... Zeile, in der ein Fehler vermutet wird ... 
181 STOP 


Die Ausführung hält vor und nach Zeile 180 an: wir können wie- 
der PRINT D,D$ eintippen, um zu sehen, was sich in Zeile 180 
ereignet hat. Mit CONT setzen wir dann die Ausführung fort. 
Auf diese Weise können wir uns von einem STOP zum anderen vor- 
tasten, 
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Beim Trace - Lauf gibt uns BASIC die Zeilennummern 
aus, die bei der Ausführung des Testprogrammes durchlaufen 
werden. Mittels TRON (für TRace ON) schalten wir diese Be- 
triebsart ein und mittels TROFF (für TRace OFF) wieder aus. 
Am Beispiel des Programmes KAPITAL10O (vgl. Abschnitt 3.1.3.1) 
wollen wir einen Trace-Lauf durchführen. Dabei gehen wir wie 
folgt vor: 

1. Programm mit DLOAD "KAPITAL10" in den RAM laden 

2. Befehl TRON tippen: Übergang in Trace-Modus 

3. Mit RUN die Ausführung starten: die Nummern der gerade 

durchlaufenen Zeilen werden gezeigt. 
4. Mit TROFF den Trace-Modus verlassen. 
5. Mit LIST das BASIC-Programm auflisten zwecks Vergleich. 


Trace-Lauf zu Programm KAPITAL10 von Abschnitt 3.1.3.1: 


L1BBJL118IKAPITALIEN BIS ZUR VERDOPPLUNG ERMITTELN. 
L12BIL13BIL14BIL15SBIL1I7AILISBIEINGESETZTES KAPITAL?L1S8)] Soaad 
[198 1.IAHRESZINSSATZ [138] 3 

[288JL2181[228 1123011243) „4508 

L2581[23031240] 29485 

[2581[230J[244) A4721.45 

[2391123011248] r’0579.0805 

[2591[230)[248]) 76331.1978 

[259112301[240) 339593. BASE 

[2591[2301[245]) 31431.3561 

[281123911240] 32625. 1321 

[2581123811240] 108594 . 624 

LZ25AJL26581LZ27BIJENDE NACH VERDOPPLUNG. 

[278] 


Codierung zu Programm KAPITALI10: 


190 REM ======PRÜGEAMM KAPITAL1R 
118 PEINT "KAPITALIEN EIS ZUR VERDOPPLUNG ERMITTELN." 
124 REM ======VEREINBARUNGSTEIL 


132 REM K: RERL “KAPITAL IN DM: 
148 REM KE: REAL SENDKAPITAL IN DM} 
158 REM P: REAL CZINSSATZ IN IM} 


160 : 

1798 REM ======ANWEISUNGSTEIL 

188 INFUT "EINGESETZTES KAFITAL";K 
130 INPUT "JAHRESZINSSATZ ";P 


20m LETTKE=SZHK 

219 REM #%##BEGINN DER ABWEISENDEN SCHLEIFE MIT WHILERRRRFERK 
228 DO WHILE K<KE 

230 LET k=K+K#P,’108 

248 PRINT " ";K 

259 LDOP 

260 REM S#5CHLEIFENENDEFFFRHRFTEIEEFEHTEEKEEIEEEE EIERN 
278 PRINT "ENDE NACH VERDÖFPLUNG." : END 
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3.8.2.3 Fehlerbehandlung mit TRAP-RESUME 


Tippen wir an der Tastatur 20 LET A="100" ein und lassen wir 
dieses Ein-Zeilen-Programm mit RUN laufen, erscheint am Bild- 
schirm die Fehlermeldung "TYPE MISMATCH ERROR IN 10" bei so- 
fortigem Abbruch der Ausführung. Tippen wir dann PRINT ERR, so 
erscheint als Antwort die Meldung "22" als Fehlernummer bzw. 
Fehlercode. 

wir wollen dieses 'Herausfliegen aus dem Programm' verhindern 
und den Fehler innerhalb des Programms selbst behandeln. Dazu 
stehen uns die Anweisungen TRAP und RESUME zur Verfügung. Das 
Programm FEHLER-TRAP1 veranschaulicht den Einsatz dieser zwei 
Anweisungen. 


Ausführung zu Programm FEHLER-TRAPI: 


FEHLERBEHRAHDLUFNG MIT TRAP-RESLME. 
FEHLER: STEING TH RERL-VARIRABLE. 
FEHLERCODE IN ER : 28 
FEHLERZEIILE: 30 

FEHLERMELDUNG: DIWISION BY ZERO 


WEITER MIT RETURN 
PROGRAMMENTDE 


Codierung zu Programm FEHLER-TRAPI: 


i REM ======FROGRAMM FEHLER-TRAPI 

2 PRINT "FEHLERBEHANNLUNG MIT TRAPF-RESUME.": FRINT 
4: 

10 TRAP See 


2a LET A="10a" 
sea LET A=3.'0 


31 

32: 

34 FRIHT "FROGEAMMENDE" 

35 EHI 

91: 

kr 

sam IF ERRIFZZ THEN GOTO san 

S1A FRINT "FEHLER: STRING IN REAL-VREIABLE." 
„za RESUME NEAT 

u) 5 u 

a: 

BBE FRIHT:FRINT "FEHLERCODE IHM ER :"JER 
ala FEINT "FEHLERZEITILE:"SEIL 

BEE FREIHT "FEHLERMELDUNG: "ERRE 

E3A FRIHT "WEITER MIT RETURN": INPUT E$ 
a4 RESUME 28 


Nach Ausführung der Anweisung 10 TRAP 500 wird beim Auftre- 
ten eines Fehlers stets nach Zeile 500 verzweigt, in der die 
Fehlerbehandlungs-Routine beginnt. BASIC stellt in einer vVa- 
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riablen ER (ER für ERror) den jeweiligen Fehlercode zur Ver- 
fügung. Für ER=22 geben wir in 510 eine Mitteilung aus, um mit 
520 RESUME NEXT in der nächsten Zeile nach der Fehlerzeile 
fortzufahren, also mit Zeile 30. 


In Zeile 30 wird mit der Anweisung 30 LET A=3/0 ein DIVISION 
BY ZERO ERROR erzeugt und wieder nach Zeile 500 verzweigt. Nun 
ist ER ungleich 22. Wir geben den in ER stehenden Fehlercode 
(Zeile 600) aus und zeigen die Fehlerzeile und Fehlermeldung. 
Im Anschluß daran wird nach Durchlaufen eines Wartepunktes in 
Zeile 630 mit der Anweisung 640 RESUME 80 der Ablauf in Zeile 
80 fortgesetzt. 


Entsprechend diesem Beispiel läuft eine Fehlerbehandlung all- 
gemein in vier Schritten ab (vgl. Abbildung). 


1. Fehlerbehandlung eröffnen: 
10 TRAP 500 


2. Fehlerbehandlungsroutine ab Zeile 500 ... 
Fehlercode in ER abfragen. 
Fehlerhinweise ausgeben: Zeile EL und Meldung ERR$ 
3. Programmablauf fortsetzen mit RESUME: 
RESUME NEXT Folgezeile nach fehlerverursachender Zeile, 
RESUME 80 Angegebene Zeilennummer. 
RESUME Fehlerverursachende Zeile selbst, 


4. Fehlerbehandlung schließen: 
TRAP ohne Zeilennummer. 


Fehlerbehandlung über das Anwenderprogramm in vier Schritten 


3.8.3 Programmierhilfen 


BASIC 3.5 stellt folgende Programmierhilfen zur Verfügung: 


- AUTO Automatische Zeilennumerierung 

- RENUMBER Zeilen neu numerieren 

- DELETE Programmbereiche löschen 

- HELP Fehlerbereich zeigen (Abschnitt 3.8.2.1) 

- TRON/TROFF Trace-Lauf in Schritten (Abschnitt 3.8.2.2) 
- MONITOR Maschinensprache-Monitor von BASIC aus 


aufrufen (Abschnitt 3.5.6) 


3.8.3.1 Automatische Zeilennumerierung mit AUTO 

Bei Einschalten des Commodore ist AUTO 0 eingestellt, d.h. 

die Schrittweite zum Numerieren beträgt 0. Durch Eingabe von 
AUTO 10 /RET/ 


stellen wir die Schrittweite 10 ein. 
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Nach Eingabe von z.B. 


100 PRINT "TEST" /RET/ 
110 ... 


gibt der Commodore AUTOma ti sch die Zeilennummern 
110, 120, 130, ... aus, bis wir durch Eintippen von /RET/ un- 
mittelbar hinter der Zeilennummer dieses Numerieren vorläufig 
abbrechen. 'Vorläufig' deshalb, da nach der Eingabe von z.B. 
333 PRINT "TEST1" erneut automatisch mit 343, 353, 363, 373,.. 
durchnumeriert wird. Mittels 


AUTO 0 /RET/ oder AUTO /RET/ 
schalten wir das Durchnumerieren wieder ab, d.h. auf die Stan- 
dardschrittweite von 0. 


Vor dem Einschalten von AUTO sollte der Hauptspeicher und der 
Bildschirm gelöscht werden: NEW /RET/ und SCNCLR /RET/ tippen. 


3.8.3.2 Zeilen numerieren mit RENUMBER 


Die Programmierhilfe RENUMBER stellen wir am Beispiel des Pro- 
gramms RENUMBER-TESTI dar: 


Codierung zu Programm RENUMBER-TEST]I: Ausführung: 
185 PRINT "TEST" TEST 

119 GOSUB 120 UFER 1 

114 30OSUB 150 UPRI Z 

13& PRINT "ENDE": END ZULETZT 

140 : ENDE 


150 REM ===LNTERPFRÜGRERMM 1 
168 PRINT "UPRO 1" 

165 RETURN 

186 REM ===UINTERPROGEAMM 2 
134 PRINT "UPRÜ =" 

2ua PRINT "ZULETZT" 

zal RETURN 


Der Reihe nach geben wir vier RENUMBER-Befehle ein, um die Co- 
dierung des Programms RENUMBER-TESTI zu ändern: 


198 PRINT "TEST" 

112 GÜSUB man 

114 GOSUB 1aza 

138 PRINT "ENDE": END 

140: 

100 REM ===1NTERFROGRAMM 1 RENUMBER 1000, 1a, 150 
1818 PRINT "UPRD 1" 

1929 RETURN 

1H3a REM ===UNTERPRÜGRAMM 2 
1249 PRINT "UPRU 2" 

1859 PRINT "ZULETZT" 

1958 RETURN 


240 


RENUMBER Z2a@0, 19.1834 
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RENUMBER 4aaan. Se 


104 FRINT "TEST" 4aaaa FRINT "TEST" 

118 GOSUB 1008 49508 GOSUB 42500 

114 GOSUR zu90 41 aB2 GÜSUB 440HA 

130 FRINT "ENDE": ERT 41546 PRINT "ENDE": END 

140 m 2415 1 BE 

1a0A REM ===UNTERFREOGEAMM 1 42500 REM ===UNTERPROGRAMM 1 
121 PEINT "UPRO 1" 43608 PRINT "UPRO 1" 

1920 RETUFN 43-00 RETURN 

2868 REM ===UNTERPRÄGERMM £ 4d4adg REM ===LNTERPROGEAMM 2 
zala PEINT "UPRO 2" 445AEg PRINT "UPRO 2" 

zu2B PRINT "ZULETZT" 45Baa FRINT "ZULETZT" 

2036 RETURN 45500 RETURN 

FEHIMBER 77 

fr? PEIHT "TEST" 


87 GOSUB 127 
37 GOSUB 157 


167 PRINT "ENDE": END 

117 : 

z’ REM ===1INTERFROGERAMM 1 

137 FREINT "UFRO 1" 

147 RETURN 

127 REM ===UNTERFROGRANM 2 

157 PRINT "UFRO 2" 

1irf PRINT "ZULETZT" 

5? RETUFN 

RENUMBER numeriert somit die zu Beginn der Zeile angegebenen 


Nummern wie auch Sprungadressen (hier hinter GOSUB) um. Häufig 
muß mehrmals nacheinander mit RENUMBER gearbeitet werden (z.B. 
zur 1000er- und 2000er- Numerierung der Unterprogramme unseres 
Programmes RENUMBER-TESTI). 


RENUMBER 1000,10,150 


.Ne u numerieren ab Zeile 1000. 
Schrittweite. 


Erste Zeile in der alten 


Codierung. 


RENUMBER 1000,10,150 Gleiche Wirkung: 1000,1010,1020,... 
RENUMBER 1000,,150 

RENUMBER 1000,10,10 Gleiche Wirkung: 1000,1010,1020,... 
RENUMBER 1000 

RENUMBER 10,10,10 Gleiche Wirkung: 10,20,30,.»- 
RENUMBER 


Programmierhilfe RENUMBER 
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Als Schrittweite ist standardmäß die 10 und als Beginnzeile 
die erste Zeile eingestellt. Bei Eingabe eines falschen RENUM- 
BER-Formates erfolgt die Meldung SYNTAX ERROR. 


3.8.3.3 Programmbereiche löschen mit DELETE 


Zum Löschen einer einzelnen Zeile tippen wir z.B. mit 
180 /RET/ 
hinter der Zeilennummer die /RET/-Taste. Programmbereiche, die 


mehrere Zeilen umfassen, können vereinfacht mittels DELETE wie 
folgt gelöscht werden: 


- DELETE -180 Alle Zeilen bis einschließlich 180: 
10,20,...,170,180. 

- DELETE 180- Alle Zeilen ab einschließlich 180: 
180,190,200,...,letzte Zeile. 

- DELETE 180-230 Alle zwischen 180 und 230 liegenden Zei- 
len: 180,190,200,210,220,230. 

- DELETE 180 Nur die eine Zeile 180. 


Anstatt DELETE kann auch DEL (L in Großschreibung) eingegeben 
werden. Der Befehl DELETE meldet sich immer mit READY., 
also auch dann, wenn aufgrund falscher Zeilennnummern gar kei- 
ne Löschung vorgenommen wurde. Aus diesem Grunde sollte nach 
DELETE immer eine Kontrolle mittels LIST durchgeführt werden. 


3.8.4 Programme verketten 


Die BASIC-Anweisung DLOAD können wir nicht nur im direkten 
Dialog verwenden, sondern auch im programmgesteuerten Dialog. 
Durch die Anweisung 


170 DLOAD "MODULNEU" 


wird ein Program namens MODULNEU von der Diskette in den RAM 
geladen und sofort zur Ausführung gebracht. Dabei wird das 
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rufende Programm zerstört bzw. überlagert. Hinsichtlich der 
Variablen sind zwei Fälle zu unterscheiden: 


- Ist das gerufene Programm länger als das rufende Programm, 
werden die bisherigen Variablen gelöscht. Grund: Der BASIC- 
Programmspeicher ragt jetzt in den Variablenspeicher hinein 
(vgl. Abschnitt 3.5.5). 


- Ist das gerufene Programm hingegen kleiner, bleiben bislang 
verwendete Variablenwerte erhalten, sie werden 'übergeben'. 


Das folgende Beispiel verdeutlicht diesen Fall der 'Variablen- 
übergabe'. Dabei wird in vier Schritten vorgegangen: 


1. Programm MODULALT wird im direkten Dialog geladen (DLOAD) 
und zur Ausführung gebracht (RUN). 


2. Das Programm MODULALT lädt automatisch ein Programm namens 
MODULNEU nach und startet es (170 DLOAD "MODULNEU"). 


3. Die bisherigen Variablenwerte bleiben erhalten, obwohl mit 
DLOAD geladen wurde: 


ZAHL: 111 
ALT$: TEXT ALT 
ALT: 111 


4. Das gerufene Programm MODULNEU kann auf bisherige Variablen 
zurückgreifen und diese verändern: 
ZAHL: 999 
Es kann natürlich auch neue Variablen nutzen: 
NEU$: TEXT NEU 
NEU: 999 


Das Programm MODULALT hat das Programm MODULNEU verkettet. Man 
spricht von Programmverkettung (chaining). 


Codierung zu Programm MODULALT : 


190 REM =====SPROGERAMM MODULALT 

119 FRINT "BEGINN FROGEAMM MODULALT." 

12a PRINT "ALT$, ALT, ZAHL:"; ALT$:ALTSZAHL 
130 LET ALTS="TEXT ALT": AlT=111: ZAHL=111 
148 PRINT"NEUS, NEU: ";NEN$; NEL 

158 PRINT "ALT$, ALT, ZAHL:": ALT$:ALT; ZAHL 
164 PRINT "ENDE FROGRAMM MODULALT.": PRINT 
178 DLOAD "MODLLNEL" 


Codierung zu Programm MODULNEU: 


1ec3 REM ======FRoGRAMmm MOTULNEL 

igia PRINT "EEGIHN FROGRAMM MODLLCHEU." 

1224 PRINT "NEUF. NEU. ZAHL: "; NEUES NEU: ZAHL 
1030 PRINT "ALTE, ALT: ": ALTSSALT 

1949 LET NEUS="TEAT NEU": MEY=439: ZAHL=9393 

ia5g PRINT"NEUF. HELU, ZAHL: ";NEUSSNEU:ZAHL 

lege FEINT "ENDE FPRÜGERMM MEDUCHEU. " 
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Ausführung zu den Programmen MODULALT und MODULNEU: 


BEGINN PROGRAMM MODULALT. Programm MODULALT 
ALT$, ALT. ZAHL: 0 08 vom Benutzer 
NEU$, NEU: 9 mit RUN gestartet 


ALT$, ALT. ZAHL:TEXT ALT 111 111 
ENDE PROGERAMM MODULALT. 


BEISINN PROGRAMM MÜDULNEN. 


NEU$, HEU. ZAHL: A 111 Programm MODULNEU 
ALT$. ALT: TEXT AT 111 durch Programm 
NEU$, NEU. ZAHL: TEXT NEL 99393 993 MODULALT 

ENDE PROGRAMM MODULNEU. verkettet 


3.8.5 Programme mit Bildschirmfenster 


Im direkten Modus können Fenster über die Taste /ESC/ in Ver- 
bindung mit "T" (Start-Ecke links oben), "B" (Ende-Ecke rechts 
unten) definiert, manipuliert und mit "N" aufgelöst werden. 
Das Programm WINDOW-TESTI zeigt, wie ein Fenster im Programm- 
Modus definiert (Zeilen 250-280), benutzt (290-320) und aufge- 
löst (330) werden kann. Eine Programmausführung mit den Ecken 
- Start-Ecke: Zeile Z1=-12/Spalte S1=19 (Zeilen 0-24 von oben) 
- Ende-Ecke: Zeile 22=24/Spalte S2=25 (Spalten 0-39 von links) 
erzeugt ein Fenster rechts unten auf dem Bildschirm. 


Codierung zu Programm WINDOW-TESTI: 


106 REM ======PROGRAMM WINDOW-TESTI 

118 PRINT "FENSTER DEFINIEREN UND BESCHREIBEN. " 

128 REM ======VEREINBARUNGSTEIL Cursorsteuerung 
138 LET CU$F=CHR$C17>: LET CR$SSCHR$CZI? mit CU$ und CR$ 
148 FÜR I=1 TO 6 wie in Abschnitt 
159 LET CUF=LCU$+C UF: LET ÜRFSCR$+ÜR$ 3.4.1. 

168 NEXT I 

178 : CHR$(27) für 
1580 REM ======ANWEISUNGSTEIL /ESC/-Taste. 
198 INPUT "START-ECKE: ZEILE,.SPALTE"; 21,51 

258 INPUT "ENDE-ECKE: ZEILE,SPRALTE"; 22,52 4 Schritte: 

216 SCHNCLR nun nn 


228 PRINT "DIESER TEXT WIRD NORMAL AUF DEM"; 
238 PRINT "BILDSCHIRM AUSGEGEBEN. "; 


240 PRINT CHR$C195; 1. Start-Ecke 
258 FRINT LEFT$CCUF, ZI): LEFTSCOR$, S1>: des Fensters 
260 FRINT CHRECZFIH"T"+CHRFL195, 

zrüa FRINT LEFT$SCCUF, ZI: LEFT$SCCR$. SED: 2. Ende-Ecke 
280 PRINT CHR$CZFI+"B";: SCHNELR des Fensters 


238 PRINT "DIESER TE#AT STEHT IM FENSTER "; 
388 FRINT "MIT START-ECKE "5215515" UND "; 
318 PRINT "ENDE-ECKE",Z2:5E 3. Ausgabe 

328 PRINT "MEITER: TASTE";: GETKET E$ durch Fenster 
338 PRINT CHREWZ7I+"N" 


344 PRINT "ENDE." : EHI 4. Fenster 


auslöschen 
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3.9 Dateiverarbeitung 


In Abschnitt 1.3.5 hatten wir vier Formen zur Organisation von 
Dateien bzw. Files erläutert: 


- sequentielle Datei (Zugriff in Speicherungsfolge) 
- Direktzugriff-Datei (Auf den Datensatz direkt) 

- Index-sequentielle Datei (Inhaltsverzeichnis als Index) 
- Verkettete Dateien (Zeiger weist auf andere Datei) 


In Abschnitt 3.9.1 demonstrieren wir die sequentielle Dateior- 
ganisation am Beispiel einer Telephon-Datei. Das Programm hat 
den Namen SEQUENT-DATEII. 


In Abschnitt 3.9.2 zeigen wir den Direktzugriff am Beispiel 
einer Artikeldatei. Programmname: DIREKT-DATEII. 


3.9.1 Sequentielle Datei 


Programm SEQUENT-DATEII verwaltet eine sequentielle Telephon- 
datei. Das Programm besteht aus einem Menü-Steuerungsprogramm 
(Zeilennummern 100-690) und neun Unterprogrammen für die aus 
dem Menü jeweils gewählte Tätigkeit (Zeilennummern 1000-9000). 
Das Programm SEQUENT-DATEII wird stets über das Menü beendet 
(Zeilennummer 340). Zur Orientierung sehen wir uns das wieder- 
gegebene Ausführungsbeispiel an. 


3.9.1.1 Menügesteuerte Dateiverwaltung 


Nach Eingabe von RUN wird ein Menü mit zehn Wahlmöglichkeiten 
gezeigt. Nach dem Eintippen von 1 als Menüwahl sowie TELDATEI 
als Dateiname wird diese (derzeit nur neun Einträge umfassende 
de) Datei komplett in den Hauptspeicher geladen. Dann werden 3 
zusätzliche Einträge eingebenen (Menüwahl 4), der Eintrag von 
STROMANN geändert (Menüwahl 6), der Eintrag von RUMMEL aus der 
Datei gelöscht (Menüwahl 7), die verbliebenen elf Datensätze 
nach Namen sortiert (Menüwahl 9) und ausgegeben (Menüwahl 3). 
Abschließend werden die elf Telephoneinträge unter dem Namen 
TELDATEI auf Diskette abgespeichert. 


Die Telephondatei enthält eine zuvor nicht festgelegte Anzahl 
von Datensätzen. Jeder Datensatz enthält die beiden Datenfel- 
der NAME und NUMMER. Da jedes Datenfeld (kurz: Feld) verschie- 
den lang sein kann, ist die Datensatzlänge variabel. Die Ab- 
bildung verdeutlicht diesen Datei-Aufbau (vgl. auch Abschnitt 
1.3.5). 
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3.9.1.2 Dateiweiser Datenverkehr 


Die Datei wird komplett in den Hauptspeicher eingelesen (Menü- 
wahl 1), um sie dort in den Arrays N$() (für die Namen) sowie 
T$() (für die Telephonnummern) abzulegen und zu verarbeiten 
(Menüwahl 3-9). Abschließend werden alle Einträge komplett Da- 
tensatz für Datensatz auf Diskette als externe Datei abgespei- 
chert (Menüwahl 2). Der Datentransport zwischen Externspeicher 
(Diskette) und Internspeicher (Hauptspeicher) erfaßt immer die 
ganze Datei als Einheit. Der sequentielle Dateizugriff erfolgt 
somit allein bei Menüwahl 1 und 2. Da er einmalig die komplet- 
te Datei umfaßt, spricht man vom dateiweisen Da- 
tenverkehr. Dem Vorteil der bequemen, schnellen (da internen) 
Verarbeitung steht der Nachteil gegenüber, daß die Datei grös- 
senmäßig durch den Hauptspeicherplatz begrenzt ist. 

Die Direktzugriff-Datei in Abschnitt 3.9.2 demonstriert den 
datensat zwei sen Datenverkehr als Gegenstück zum 
dateiweisen Datenverkehr. 


Struktogramm zu Programm SEQUENT-DATEII: 


Arrays N$() und T$ für Namen und Nummern dimensionieren 


Solange Menüwahl W ungleich 0 ist, wiederhole 


Menü anbieten und gültige Menüwahl in W speichern 
1 


Fallabfrage zu W 
















svao c:mh5 rbb) E 


JOKOFAnHROm 


s3Svvaeun 


Wartepunkt: Weiter mit RETURN 
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Datei (File) .«... Z.B. namens TELDATEI 


Datensatz (Record) ..„. mit jeweils zwei Einträgen 


'Name' N$() und 'Nummer' T$() 


|Datenfeld (Field), Eintrag ... mit unterschiedlicher Länge, 


d.h. Anzahl von Zeichen 


zeichen (Character), Byte .+. beliebige Zeichen, da Daten- 


felder vom Datentyp STRING sind. 


Aufbau der Telephondatei: Datei-Satz-Feld-Zeichen 


DIM N$C109): REM 199-ELEMENTE-FELD FUER NAMEN 
DImM T$<100:: FEM 1B8G-ELEMEHTE-FELD FÜUER HUMMERN 
REM WE: MEHUEWAHL 


A REM F$: HAME DEF SEQUENTIELLEN IATEI 
FEM MH: RHNZAHL YÜHN SAETZEH IN DER DATEI 
FEM 1.2: LAUFYARTAELEN 
REM F: FLAGGE BZW. FLAG 


REM HINMEIS: DATEI-ANWEISUNGEN IM CEM-EASIC 3.5 


REM ======AHWEISUNGSTEIL 


A REM ###MENUE- HAUFTFROGRAMEREEEREEEEEENENEENEN 


nahm och 


Wu 


LET H=1 
DJ WHILE WISB 
GOSUB Sag: REM UPRO MEHUEANGEBOT 
SCHELR 


IF MERINTCHSOTHEN FREIMT O"GAHZEAHLIG.": 6070 838 
FETUFH 


u 


OH U GOSUE lead, Zage, oa, 4acıa, Sag. sand. Faad, sad. FEIgE 
FRINT "WEITER MIT FETUFM" 
GET ME: IF Ue="" THEN 210 
SCHELR 
LOOF 
FEIHT "FROGERMMENDE:": EHT 
FEN ##&#&UNTERFRÖGERAMM MENLERNGEEOTERFEEFEREFEN EN 
aa FRINT "MENLE ZUR VERWALTUNG DEF TELEFHÖN-DATEI" 
U RRINE Pass En EEE SET RSS HFRBIERTRS i 
FPEINT" 8 BEENDEN" 
FEIHT " 1 LADEN DEF DATEI -> INTERN" 
4 FEIHT " 2 SFEICHERH DER DATEI -> EHTERN" 
FEIHT" 2 ZEIGEN GESAMTVERZEICHHIE" 
SE FEINT" 4 EINHSEBEH YO EINTREAEGEN" 
ra PEINT " 5 SLICHEN EINES EINTEAGS" 
9 FEIHT " 8 REHDERH EINES EINTRAGS" 
aa FEINT " 7 LOESCHEH EINES EINTRAGS" 
Ma FEIHT" © EIHFUEGEN EINES EINTRAGS" 
1a FEINT" 3 SORTIEREN DER GESAMTDATET" 
ed: PRINL Ferrara H HE EEE EEE . 
>20 INPUT "MAHL 0-2": ME: LET MEYALCHEN 
4a IF Mio ÜR W>@ THEH FRIMT "ZUISCHEN g UNT 9.": GOTO 8360 
K 
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Codierung zu Programm SEQUENT-DATEIIl (erste Fortsetzung): 


635 REM ###UNTERFROGRAMM LADEN TEEN 
igca FRINT "DATEI VON DISKETTE IN TEN RAM LADEN." 
1819 IHMPUT "NAME DER DATEI": F$ 

1020 OFEN 1,2,3, "0: "+F$+",5,R" 

1039 IF DS=E THEN 1456 

1943 PRINT "FEHLER BEIM OEFFNEN: ";05#: STOP 

1a INFUT#L,N 

12a IF IS<>8 THEN PREINT"LESEFEHLER: ":D5+: STOP 
17a FOR I=1 TON 

12859 IHPUT#L,NECIT>, TFT) 

19>3@ IF 058 THEN FRINT"LESEFEHLER: ":DS#: STOP 
1188 NEAT I 

1118 PEINT N:" EINTRREGE “WON DISKETTE IH DEN ERAM." 
ılza CLOSE 1 

1138 RETURN 


1568 REM ###LINTERPRÜGEAMM SPEICHERNEERFERETRERRERETEENN 
zaad PRINT "DATEI YoM EAM AUF DISKETTE SFEICHERN,. " 
2818 INPUT "NAME DER AUSGABEDATEI". F# 

228 INFUT "BISHERIGE DATEI ZEFSTOEREN £.IAHNEIN>", HE 
2asa IF WELH" IA" THEN 2140 

2043 OPEH 1.3,3, "90: "+F$+",3. 4" 

2955 IF I5<74 THEN FRINT "EIPEN- FEHLER: ";D5$: STOF 
2868 FRINT#1, HN 

2078 IF I5X74 THEN PRINT "SCHREIBFEHLER: "052: STOP 
usa FOR I=1 TO H 

2838 FEINT#1.NEÜI>: FRINT#1. TI) 

2140 IF I5<>@ THEN FEINT "SCHREIEFEHLER: ";D5#: STOP 
2119 NEST I 

2128 PRINT N;" EINTRAEGE YOM ERM RUF DISKETTE." 

2130 CLOSE 1 


21489 RETURN 

2150 : 

2180 : 

2ira REM ###UNTERFROGRFEAMM DEUCKEHFEFEEEREEREEREITEKERENE 
3gaa FRINT "NAME: TELEPHONNUMMER : " 


3823 FOR I=1 TON 

3038  FREINT N$CI>, TABiZ42, TEL) 

3a4a IF INTSL/1GHS>I/lEO THEN 306 

3asa  INFUT "WEITER BLAETTERN", WE 

30652 HEAT I 

3a7a FEINT "DATEIENDE NACH "N," EINTRAEGEN.": RETURN 


3038 FEM ###UHTERPROÖGERMMA EINGEBEHFERERFRRREEFEIELFENN 
aaa DO 

4318 LET N=h+l 

4420 INPUT "NAME SB=ENDE>"; HECH) 

4asa IF HECH>="8" THEN LET H=H-1: EAIT 

4a43 — TIHFUT "TELEFHÖNNLMMER"; TECH) 

4559 LOUF 

486549 RETURN 
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Codierung zu Programm SEQUENT-DATEII (zweite Fortsetzung): 


deze 
Joe 
sale 
SZ 
0:0 
Sell 
Saas 
ka] «15 
„orE 
als el 


REM #3#UHTERFREOGEAMM SUCHEN 
INPUT "ZU SUCHENTER NAME": WE 
LET F=8: REM FLAGGE GESEHKT 
FOR I=1 TON 
IF LEFTFCHFUTD,LENCHEFI SCHUF THEN Sasse 
FRIHT "GEFUNDENE NUMMER: ":TFUI: 
LET I=N : LET F=-1 


NEXT I 
IF HOT F THEN FRINT W&;" HICHT GEFUNDEN. " 
RETURN 


Ssoaa : 


10 
BAR 
615 
bEIzE 
bErSE 
5044 
6 


a I TS 
u 


N Er 


So 
Dr 


u ee | d =J J = J | Be 


REM $##UINTERFROGRAMM AENDERN 
IHPLT "NAME DES ZU AENDERHDEH EINTRAGS"; WE! LET F=B 
FÜR I=1 TO H 

IF LEFTSÜNSÜILEHCHSIISUF THEN 5038: ELSE Sas0 


DO MHILE WMES"TA" 
FRINT N$C1>;" AENDERN IN ";: INPUT N$CD5 
FEINT T#WI:;" RENDERN IM ";: IMPUT TEEID 
PEINT N$CI>," "STFCI25" KORREKT SIRASNEIN> "5: IHPUT UWE 
LOOPF 
I=H: LET F=-1 
HE=ST I 
IF HOT F THEN FRINT "EINTRAG "WE," HICHT GEFUNDEN." 
RETUFH 


3 REM ORE#HUNTERPROGERMM PHYSISCH LDESCHEHMFEREEERFEN 


IMPUT "HAME DES ZU LOESCHENDEN EINTRAGS"; W$ : LET F=8 
FOR I=1 TON 

IF LEFTECHEEIS.LENHCNENS S>UlF THEN 7100 

FRINT N$21>:" TATSRECHLICH LOESCHEN CIASHEINS "5: IMFUT WE 

IF WC" IA" THEN 70998 

FÜR Z=I TO M-1 

Bl NELZISNFLZrHL> : LET TEIZISTER HL 

ME=T Z 

ET N=H-1 

LET I=H : LET F=-1 
HEAT I 
IF NOT F THEN PRINT W&;" HICHT GEFUNDEN. KEIN LOESCHEN. " 
FETURH 


4 FEN KE&UNTERFROGRAMM ETNFÜIEGENEEREERFEFEFIEIEREN NE 


PRINT "DATEI ":F$:" HAT";N," EINTRAEGE. NACH WELCHEM" 
IMPUT "EINTRAG EINFUEGEN © SATZNUMMER TIPPEN?" W 
LET N=N+1 


3 FÜR Z=N TO W+2 5STEF -1 


LET NELEISNFEZ-12 : LET TFÜZI=TElZ-10 


4 NEAT Z 


FEINT "HACHFOLGENDE EINTRAEGE SIND YWERSCHOREN. " 
INPUT "EINZUFUEGEHNDER NAME ":NFC4+rL) 
INPUT "EINZUFUEGENDE HUMMER ";TfCW+l> : RETURN 
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Codierung zu Programm SEQUENT-DATEII (letzte Fortsetzung): 


212 1: BE 

slca REM ###UNTERFREÜGERMM SORTIERENH-DURCH-AUSTAUSCH-NACH-AUSWAHL 
sage FRINT "SORTIEREN YON"SN;" DATENSAETZEN ";F$;" BEGINNT." 
Sal FÜR I=1 TO N-1 

Saza LET MINSTELLE=I : LET NAMMIN$S=N$CT) 

9058 LET TELMIN$=TF$UID 

Ssa4a FOR Zeilti> TON 

9a IF N$CZ3>=NAMMINF THEN 9078 

San LET MINSTELLE=Z2: NAMMINF=N$CZI: TELMIN$=TFCZ) 

Sara MNEHT Z 

SsE543 LET NFUMINSTELLE>=SNFCIS: LET N$EID=NAMMINS$ 

Ssa3a LET TFCMINSTELLE?STFCIS: LET T$CI>=TELMINE 

91a HEXT I 

Sila FEINT "SORTIEREN IM HAUFTSPEICHER BEENDET." 

Alzea RETURN 


Ausführung zur Verwaltung einer Telephondatei über 
Programm SEQUENT-DATEII: 


TELEPONLISTE ALS SEQUENTIELLE DATEI 


MENUE ZUR VERWALTUNG DER TELEPHON-DATEI 
0 BEENDEN 

1 LADEN DER DATEI -° INTERN 
2 SPEICHERN DER DATEI -° EXTERN 
3 DRUCKEN GESAMTVERZEICHNIS 

4 EINGEBEN VON EINTRAEGEN 

5 SUCHEN EINES EINTRAGS 

6 AENDERN EINES EINTRAGS 

7 LOESCHEN EINES EINTRAGS 

8 EINFUEGEN EINES EINTRAGS 

9 SORTIEREN DER GESAMTDATEI 


WAHL 0-9? 1 Hinweis: Die Menü- 

NAME DER DATEI? TELDATEI ausgabe wurde jeweils 
9 EINTRAEGE TELDATEI --?’ HAUPTSPEICHER. weggelassen. 

WEITER MIT RETURN 

MENUE ZUR VERWALTUNG DER TELEPHON-DATEI 


WAHL 0-9? 3 


NAME: TELEPHONNUMMER: 
STROMANN 06262/3332 
WEBER 0721/1300165 
TREIBER 0611/232323 
KOEPFLE 06221/44421 
SCHOENFELDER 06203/5541 
SCHMIDTBORN 06221/332000 
RUMMEL 089/4413998 
MAUCHER 06204/1210 
RUDOLFS 06221/33125 


DATEIENDE NACH 9 EINTRAEGEN 
WEITER MIT RETURN 
MENUE ZUR VERWALTUNG DER TELEPHON-DATEI 
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Fortsetzung der 


WAHL 0-9? 4 

NAME (O=ENDE)? 
TELEPHONNUMMER? 
NAME (O=ENDE)? 
TELEPHONNUMMER? 
NAME (O=ENDE)? 
TELEHONNUMMER? 
NAME (O=ENDE)? 


3 Programmierkurs mit Commodore-BASIC 3.5 


Ausführung zu Programm SEQUENT-DATEII: 


DOMBERG 
07622/163390 
HOFFMANN 
0621/1199110 
KRAEMER 
06227/1971 

0 


WEITER MIT RETURN 
MENUE ZUR VERWALTUNG DER TELEPHON-DATEI 


WAHL 0-9? 6 


NAME DES ZU AENDERNDEN EINTRAGS? 
STROMANN AENDERN IN? 
06262/3332 AENDERN IN? 


STROMANN 
STROMANN-KRAEMER 
06262/3332 


STROMANN-KREAEMER 06262/3332 KORREKT (JA/NEIN)? 


WEITER MIT RETUR 
MENUE ZUR VERWAL 
WAHL 0-9? 7 

NAME DES ZU LOES 


RUMMEL TATSAECHLICH LOESCHEN (JA/NEIN)? 


WEITER MIT RETUR 

MENUE ZUR VERWAL 

WAHL 0-9? 9 

SORTIEREN 

SORTIEREN 

WEITER MIT RETUR 

MENUE ZUR VERWAL 

WAHL 0-9? 3 

NAME: 

DOMBERG 

HOFFMANN 

KOEPFLE 

KRAEMER 

MAUCHER 

RUDOLFS 

SCHMIDTBORN 

SCHOENFELDER 

STROMANN-KRAEMER 

TREIBER 

WEITER BLAETTERN 

WEBER 

DATEIENDE NACH 1 

WEITER MIT RETUR 

MENUE ZUR VERWAL 

WAHL 0-9? 2 

DAME DER AUSGABE 

BISHERIGE DATEI 
11 EINTAEGE HAU 

WEITER MIT RETUR 


N 
TUNG DER TELEPHON-DATEI 


CHENDEN EINTRAGS? RUMMEL 
JA 
N 


TUNG DER TELEPHON-DATEI 


N 
TUNG DER TELEPHON-DATEI 


07622/163390 
0621/1199110 
06221/44421 
06227/1971 
06204/1210 
06221/33125 
06221/332000 
06203/5541 
06262/3332 
0611/232323 


0721/1300165 
1 EINTAEGEN. 
N 
TUNG DER TELEPHON-DATEI 


DATEI? TELDATEI 
ZERSTOEREN (JA/NEIN)? JA 
PTSPEICHER --” TELDATEI 

N 


MENUE ZUR VERWALTUNG DER TELEPHON-DATEI 


WAHL 0-9? O0 
PROGRAMMENDE. 


JA 


VON 11 DATENSAETZEN DER DATEI TELDATEI BEGINNT. 
IM HAUPTSPEICHER BEENDET. 


3.9 Dateiverarbeitung | 251 


9 WGRERVETATRTETZ 00000 1111ÜÜÜÜIÜÜÜIIIII m nn 


3.9.1.3 Datei Öffnen, verarbeiten und schließen 


Zum Steuerprogramm in den Zeilen 250-340: Wie auch das Struk- 
togramm zu SEQUENT-DATEII zeigt, weist das Programm eine Wie- 
derholungsstruktur (Schleife), in die eine Auswahlstruktur mit 
der Fallabfrage in Zeile 290 eingeschachtelt ist. 


Zum Unterprogramm LADEN in den 1000er Zeilen: Hier erkennt man 
den für die Dateiverarbeitung typischen 3er-Schritt (vgl. Ab- 
schnitt 1.3.5.4) "Öffnen - Verarbeiten - Schließen’. Zum Öff- 
nen und Schließen der Datei stehen uns die Anweisungen OPEN 
und CLOSE zur Verfügung. Mit der INPUT#-Anweisung verarbeiten 
wir die Datei im lesenden Zugriff. In der Abbildung wird ge- 
zeigt, wie diese drei Schritte im Programm SEQUENT-DATEII pro- 
grammiert sind. 





Datei Öffnen, Datensätze lesen und Datei wieder schließen 


Zum Unterprogramm SPEICHERN in den 2000er Zeilen: Als erstes 
wird die Satzanzahl N auf die Datei geschrieben, dann die N 
Datensätze jeweils mit den zwei Datenfeldern Name sowie Tele- 
phonnummer. 
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In der OPEN-Anweisung in Zeile 2040 steht nun anstelle von "Rr" 
für Read (Lesen) der Parameter "W" für Write (Schreiben). An- 
stelle der Leseanweisung INPUT#1 verwenden wir die Schreib- 
anweisung PRINT#1. 


1. Datei öffnen 
2040 OPEN 1,8,3,"@0:"+F$+",S,W 


Ggf. bereits bestehende 
Datei wird überschrieben. 
W für Write (Schreiben). 
Sonst wie beim Lesen. 


2. Datei verarbeiten: Inhalt von N$(I) und T$(I) als nächste 
Einträge auf die Datei schreiben. 


2090 PRINT#1,N$(I): PRINT#1,T$(I) 


Am Ende jedes PRINT#]1 wird 
ein RETURN abgesandt. 


3. Datei schließen: 


2130 CLOSE 1 Datei mit allen Änderungen 
wieder schließen. 


Datei öffnen, Datensätze schreiben und Datei wieder schließen 


Da die sämtliche Einträge auf der Disketten-Datei durch RETURN 
bzw. CHR$(13) getrennt gespeichert sind, müssen wir die Tren- 
nungszeichen über PRINT#1 auch schreiben. Die Abbildung gibt 
dazu drei Möglichkeiten an; sie zeigt auch, daß beim Lesen mit 
der Anweisung INPUT# keine CHR$(13) angegeben werden. 


von Datei lesen: 

1080 INPUT#1,N$(I),T$(I) Alle Zeichen bis zum nächsten RE- 
TURN nach N$(I) lesen und die 'Zei- 
che bis zum dann folgenden RETURN 
nach T$(I) lesen, 


Auf Datei schreiben: 
2090 PRINT#1,N$(I) : PRINT#1,T$(I) N$(I) speichern, dann 
RETURN, dann T$(I) und dann erneut 
RETURN speichern. 
2090 PRINT#1,N$(I),CHR$(13),T$(I) Zweite Form. 
2090 PRINT#1,N$(I);CHR$(13);T$(I);CHR$(13) Dritte Form. 
2090 PRINT#1,N$(I);CHR$(13);T$(I) (=identisch) 


Gegenüberstellung von Lese- und Schreibanweisungen 
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Bei allen drei Formen der Anweisung 290 PRINT#2 werden die 
Datenfelder jeweils durch CHR$(13) bzw. RETURN getrennt. Wählt 
man die 2. Form mit dem "," als Trennungszeichen, werden Leer- 
stellen mit abgespeichert. Das '";'" dagegen bewirkt, daß alle 
Einträge "dicht an dicht' nebeneinanderstehen. 


3.9.1.4 Verarbeitung von Arrays in Unterprogrammen 


Zum Unterprögramm SUCHEN in den 5000er Zeilen: 

Hier wird rein sequentiell Satz für Satz bzw. Eintrag für Ein- 
trag in der Datei (im RAM) gesucht. Die Zählerschleife hat nur 
einen Ausgang. Die Flagge F dient der Ablaufsteuerung. 


Zum Unterprogramm ÄNDERN in den 6000er Zeilen: 

Der Ablauf entspricht im wesentlichen dem Unterprogramm SUCHEN 
(FOR-Schleife zur Steuerung des sequentiellen Suchens eines 
Satzes). Die FOR-Schleife schachtelt eine WHILE-Schleife ein,- 
die die Eingabe der Änderung überprüft. 


Zum Unterprogramm PHYSISCH LÖSCHEN in den 7000er Zeilen: 
Physisch löschen heißt tatsächlich löschen. Die Zählerschleife 
7050-7070 bewirkt, daß alle Einträge ab dem zu löschenden Ein- 
trag um eine Position bzw. um ein Element in den Arrays N$() 
und T$() vorge rückt werden. 


SEO. TELEPHONDATEI AUF DISKETTE (GGF. AUF KASSETTE): 

12 ‚STROMANN ‚06262/3332, WEBER ‚0721/1300165, TREIBER, 0611/23 
2323, KOEPFLE, 06221/44421, ‚SCHOENFELDER, 06203/5541 „SCHMIDTB 
ORN ‚06221/332000, ... 


Wir erkennen: 

- Variable Datensatzlänge bei der sequentiellen Datei 
möglich. 

- Trennungszeichen CHR$(13) bzw. RETURN zwischen den Daten- 
feldern (hier durch "," dargestellt). 


SEO. TELEPBONDATEI INTERN IM HAUPTSPEICHER (ARRAYS N$, T$): 
Index: N$(): T$(): N: 12 

(1) | | | Im dateiweisen Datenverkehr 
(2) wird die gesamte Datei kom- 
0611/232323 plett in die Arrays N$() 
06221/44421 und T$() eingelesen. 
|SCHOENFELDERI|06203/5541 | 
ISCHMIDTBORN 1106221/332000| 










Am Ende wird der Inhalt 
der Arrays komplett auf 
die Datei geschrieben. 


) 
) 
) 
) 
} 


Saueuw 


Ir 
( 
( 
( 
( 


Dateiweiser Datenverkehr: Gesamtdatei intern in Arrays ablegen 
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Zum Unterprogramm EINFÜGEN in den 8000er Zeilen: 

Die Zählerschleife 8030 FOR Z=N TO W+2 STEP -1 rückt Einträ- 
ge (vom letzten Satz ausgehend) um jeweils eine Position nach 
hinten, um in den Zeilen 8070-8080 den neuen Eintrag in die 
Arrays N$() und T$() einzufügen. 


Zum Unterprogramm SORTIEREN in den 9000er Zeilen: Ä 
Wie in Programm SORTDATENI! (vgl. Abschnitt 3.7.3.1) wird das 
"Sortieren durch Austausch nach Auswahl" verwendet, jedoch mit 
folgenden Abweichungen: 

1) Anstelle von Zahlen werden Strings sortiert. 

2) Die Anzahl der Sortierbegriffe ist mit N variabel. 


3.9.1.5 Fehlerbehandlung beim Dateizugriff 


Bei j e de m Diskettenzugriff sollte eine Fehlerabfrage vor- 
genommen werden. Die Abfrage der Floppy nach Fehlermeldungen 
bezieht sich auf die Systemvariablen DS und DS$ „ in denen 
das DOS die Fehlernummer und die Fehlermeldung bereitstellt. 
Im Programm SEQUENT-DATEI1I wird nach jeder OPEN-, PRINT#- und 
INPUT#-Anweisung diese Fehlerabfrage durchgeführt: 


... IF DS<>0 THEN PRINT "...FEHLER: ";DS$: STOP 


Damit wird beim Auftreten eines Diskettenfehlers die Fehlerart 
angezeigt und das Programm durch STOP mit der Meldung "BREAK 
IN ...(Zeilennumer)..."abgebrochen. Man kann die Fehlerabfrage 
auch als Unterprogramm schreiben und nach jedem Diskettenzu- 
griff mit GOSUB aufrufen. Dies hat jedoch den großen Nachteil, 
daß man die Zeilennummer des Fehlerauftretens nicht erfährt. 


OPEN 1,8,3,"DATEI" Eingabe, um Fehler zu erzeugen. 
PRINT DS /RET/ DS enthält die Fehlernummer. 

62 

PRINT DS$ 






62, FILE NOT FOUND, 00, 00 
nen - - Fehlernummer 

u — Fehlermeldung 
—-Fehlerort:;: Spurnummer Diskette 


Fehlerort: Sektor/Block-Nummer 


Beispiel zur Fehlerabfrage der Variablen DS und DS$ 
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3.9.1.6 Speicherung einer Datei im Hauptspeicher 


Es gibt mehrere Möglichkeiten, eine Datei bzw. deren Datenfel- 
der im RAM bzw. Hauptspeicher zu speichern. 


1. Jedes Datenfeld erhält einen eigenen String zugewiesen. 
100 Sätze zu je 2 Feldern beanspruchen 100%2%5=1000 Bytes 
allein zur Speicherorganisation (bei 5 Bytes je Variable). 
Diese Lösung ist nicht ökonomisch. 


2. Ein String für die gesamte Datei. 
Kaum möglich, da ein String maximal 255 Zeichen lang sein 
und damit die Datei nicht aufnehmen kann. 


3. Ein String mit fester (konstanter) Länge für jeden Satz: 
Das längste Felä der Datei bestimmt die für jedes Feld im 
String zu reservierende Stellenzahl. Dies führt leicht zur 
Verschwendung von Speicherplatz. 


4. Ein String mit variabler Länge für jeden Satz: 
Zwischen den Feldern stehen Trennungszeichen (z.B. ","). 
Damit ergibt sich eine gute Speicherausnutzung. 


Bei den Möglichkeiten 1, 3 und 4 wird man die Strings zumeist 
in einem Array anordnen. 


Die Telephondatei wurde komplett in den Hauptspeicher geladen 
(dateiweiser Datenverkehr). Da in der DV-Praxis die Dateigröße 
den im Hauptspeicher verfügbaren Platz häufig übersteigt, müs- 
sen die Datensätze einzeln gelesen und geschrieben werden (da- 
tensatzweiser Datenverkehr). 

Diese Form einer sequentiellen Datei bietet sich an, wenn 
ein Magnetband oder eine Kassette als externer Speicher ver- 
wendet wird und wenn die Datensätze überwiegend in der Rei- 
henfolge verarbeitet werden, in der sie gespeichert sind. Ent- 
spricht die Reihenfolge des Dateizugriffs der Speicherungsfol- 
ge nicht, wird man eine Datei mit Direktzugriff organisieren. 
Darauf gehen wir im folgenden Abschnitt ein. 
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3.9.2 Direktzugriff-Datei 


Das Programm DIREKT-DATEII verwaltet eine Artikeldatei, die 
als Direktzugriff - Datei 1 organisiert ist. 
Gegenüber der sequentiellen Telephondatei von Abschnitt 3.9.1 
weist diese Artikeldatei folgende Neuerungen auf: 


- Datensätze mit konstant er Satzlänge . 

- Direkt zugriff über einen Satzzeiger S (RECORD#,(S)). 
beim Lesen wie beim Schreiben. 

- Datensatz we is er Datenverkehr. 

- Direkte Adressierung des Datensatzes. 


Diese drei Neuerungen wollen wir nun im einzelnen erläutern. 


3.9.2.1 Datei mit konstanter Datensatzlänge 


Die Datensätze der Artikeldatei namens ARTIKELDATEI haben alle 
eine feste Satzlänge von L=36 Stellen und bestehen aus jeweils 
vier Datenfeldern. Jeder Satz ist somit gleich lang. 


Inhalt: Artikelnummer: Bezeichnung: Menge: Stückpreis: 
Stellen: / 4 / 20 a. / 8 / 
(DATENTYP) STRING STRING STRING STRING 
Var.-Name: A$(1) A$(2) A$(3) A$(4) 


Datensatz-Beschreibung (36 Stellen) für die ARTIKELDATEI 





Eine Direktzugriff-Datei hat im Gegensatz zur sequentiellen 
Datei stets eine feste Datensatzlänge 
die in der DOPEN#-Anweisung angegeben werden muß: Eine solche 
DOPEN$-Anweisung sieht z.B. wie folgt aus: 


... DOPEN#1 ,"ARTIKELDATEI",L36,DO 


Kanalnummer 1 
Dateiname 
Datensatzlänge fest 
Laufwerknummer 0 


Gibt man die Parameter in Variablen ein, so lautet die DOPEN- 
Anweisung z.B. So: | 


... DOPEN#(KN),(F$),L(SL),D(LN) 


Eine einmal für die Datei namens ARTIKELDATEI angegebene Satz- 
länge von 36 Stellen kann nicht mehr verändert werden und muß 
bei jedem späteren Dateizugriff angegeben werden (eine andere 
Länge ergibt eine Fehlermeldung). 
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Das Lesen und Schreiben von Sätzen kann in beliebiger Reihen- 
folge geschehen, d.h. wir können zuerst den 51. Satz schreiben 
(Satzbeginn ab Stelle 50*36=1800) und dann erst den 2. Satz 
(Satzbeginn ab Stelle 1*36=36). Über die feste Satzlänge er- 
mittelt das Betriebssystem die Stelle (relativ zum Dateianfang 
gesehen), an welcher der Satz beginnt. Deshalb bezeichnet man 
die Direktzugriff-Datei oft als relative Datei. 
Im Directory bzw. Disketten-Inhaltsverzeichnis erscheint die 
ARTIKELDATEI als REL (für RELative Datei). Kurz: Es liegt eine 
REL-Datei vor. 


In Commodore-BASIC werden leere Datensätze durch das Zeichen 
CHR$(255) markiert. V o r dem Arbeiten empfiehlt es sich, eine 
Leerdeart ei mit der ungefähr benötigten Anzahl von Da- 
tensätzen anzulegen. Eine einfache Möglichkeit hierzu besteht 
darin, an die Stelle des letzten Satzes das Zeichen CHR$(255) 
zu schreiben. Alle vorangehenden CHR$(255) fügt das DOS dann 
selbst ein. 

Für unsere ARTIKELDATEI erhalten wir bei einer Satzanzahl von 
40 folgenden Ablauf zum Anlegen einer Leerdatei: 


100 REM ======DIREKTZUGRIFF-DATEI LEER ANLEGEN 
110 DOPEN#1 , "ARTIKELDATEI",L36,DO 

120 RECORD#1,(40) 

130 PRINT#1,CHR$(255) 

140 DCLOSE#1 


3.9.2.2 Direktzugriff über einen Satzzeiger 


Die RECORD#-Anweisung RECORD#1,(5) positioniert den Satzzei- 
ger S auf den gewünschten Datensatz, um ihn mittels PRINT#1 zu 
beschreiben bzw. mittels INPUT#1 zu lesen. Mit den Anweisungen 


oc. RECORD#1,(40) 
... PRINT#1,CHR$(255) 


schreiben wir das Zeichen CHR$(255) an die Position "Satzlänge 
mal 40", also an die Anfangsstelle des 40. Datensatzes. 


zum Schreiben von Sätzen in die Disketten-Datei: In 
einer Schreibroutine bewirken die Anweisungen 


... RECORD#1,(S) A(4) 
... PRINT#1,AS(1);CHR$(44);A$(2);CHR$(44);A$(3);CHR$(44); 


daß die 4 Datenfelder Nummer A$(1), Bezeichnung A$(2), Menge 
A$(3) und Stückpreis A$(4) als S. Datensatz gespeichert werden 
(für S=25 wird also der 25. Satz geschrieben und für S=3 der 
3. Satz). Intern im RAM legen wir den Datensatz also in einem 
4-Elemente-Array namens A$() ab. 

Die Datenfelder trennen wir mittels Komma bzw. CHR$(44) von- 
einander. Als Trennungszeichen ist auch RETURN bzw. CHR$(13) 
möglich. 

Hinter der letzten Variablen (hier hinter A$(4)) schreibt die 
PRINT#-Anweisung automatisch ein RETURN. 
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Zum direkten Le s en der ARTIKELDATEI: Die beiden 
Anweisungen 


... RECORD#1,(S) 
... INPUT#1,A$(1),A$(2),A$(3),A$(4) 


dazu, die vier Datenfelder des S. Datensatzes in die genannten 
Variablen einzulesen. 

Die INPUT#-Anweisung liest ab der 1. Stelle des S. Satzes alle 
Zeichen bis zum nächsten Trennungszeichen und weist diese Zei- 
chen dann der jeweils genannten Variablen zu. 

Die Trennungszeichen (hier: CHR$(44) und CHR$(13)) sind in der 
Datei abgelegt und müssen hinter PRINT# deshalb nicht angege- 
ben werden. 


Codierung zu Programm DIREKT-DATEII: 


18 REM ======FROGEAMM DIRERT-DATEII 

118 FEINT "VERWALTUNG EINER AFRTIEELDATEI" 

120 PRINT "UERER DIFEKTZUGEIFF IN BASIC 3.5." PRINT 
130 : 

142 REM ======WEREINPARLUNGSTE IL 

150 DIM A$c4>: FEM ARTIEKELSATZ MIT 4 DATEHNFELDERN 
168 REM F$.5L: FILE-HAME, KONSTANTE SATZLRENGE 

170 REM 5. SUCH: SATENLUMMER. SUCHBEGRIFF 

158 FEM LÖWE: LOWBTTE (NIEDEFWMERTIGES BrTE> FÜER S 
1329 EEM HIGHB: HIGHETTE “HÜEHERWERTIGES BTTE> FUÜER 5 
za FEEM ADFESSRECHNUNG 75=5UCH- 1829“ 


eln : 
220 REM ======ANWEISUHGSTEIL 
236 OFEN 15,5,15. "10" : CLOSE 15 : REM FEHLERERANAL 


2420 INFUT "DATEINAME. SATZLAENGE": F#.SL 

258 SCHELR: PRINT:FPREIMT "MENJE ARTIEELVERUALTUNG" 
268 FEINT "a = ENDE DES FROGRAMMS" 

2’o PRINT "1 DATENSRETZE DIFERT SCHREIBEM" 

254 FEINT "Z = DATENSRETZE DIRERT LESEN" 

23a FEINT "2 = RELATIVE DATEI LEER AHLEGEN" 

3a IHFUT EF: LET E=WAL(CER> 

sis OH E+L GOTO 320. 10098, 2000, 30065 

geek FREINT "a.1,2 ODER 2.": GOTO zac 

3a PRINT "EHDE." : END 


rad REM ###S1MULATION DER ANWETSUHNG "RELORDEEREERE 
LET HIGHE=INTC3.’2562 : LET LÜME=S-HIGHE#EIE 
FRIHNT#$1S."FI+CHREUIEHZI+HCHRFLOUBP HCHRECHIGHES+CHRF UL 


uch 


RR) 


738 IF 15=5@ THEN 75@: REM FALLS MEU ANLEGEN 
rag IF DS<HE THEN FEINT "FEHLER: ":05$#: STOP 
r52 RETURN 
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Codierung zu Programm DIREKT-DATEII (1. Fortsetzung): 


Laag 
121 
1020 
Lese 
a4 
1058 
1968 
170 
1950 
1070 
1129 
ıl1a 
1128 


u ER 


ya ji jet 
ei ei de 


ui 
nr 
ıSı te 
S 


Zu 
za1e 
zu28 
An elE 
2adn 
gs 
ZA 
ea’ 
zuna 
2030 
210 
2118 
212 
2138 
2140 
2158 
21er 
2178 
elle 
2120 
zzgM 
2218 


DENERERENE 
mama 19 1 
N a a ER) 


KT ER EN 


m 
Da 


REM ###45AETZE SCHRETBEHEREFEEREFEEEFEEFEEN EEE 
OFEH 15,.5,15 : REM BEFEHLSKRNAL DEFFNEH 
OPEN 1.3,2,F#: REM DIREKTZUGRIFDATEI 
IF DES>a THEN FRINT "SCHREIBFEHLER: ":15$: STO 
PEIMT "SRETZE SCHREIBEN ÜA=ENDE:." 
DO 
FEIHT "HUMMER. BEZ., EESTAND, PREIS:" 
INFUT AFILS. MEZ. A323. An 
IF A£cC12="M" THEN E=IT 
LET S=WALEH$i132-1oae 
IF 571 THEN PRINT "HEFTE": GOTO 1220 
FEN #4#&DIFEEKT SCHREIBEN 
GOSUE ad: REM AHWEISUHNG RECORD# 
FEIHT#L.AFCOLSSCHEEOI SS AFCZIS CHEF LEN: AFC3SCHREI IE RFCH) 
REM ##ENIE SCHREIBEFEHLAKH* 
LOOF 
LLOSE 15: CLOSE 1 
FRIHT "ARTIEELDATET GESCHLOSSEN." 
IHFUT "WEITER MIT RETURN":EF: GOTO 25% 


REM #E#SRETZE LESENEEEREREEEEEFETEEEIEEEEEEEENNE 
DFEN 15.95.15 : OPEN 1,5.2,F$ 
IF 205258 THEH FEINT "LESEFEHLER: ";D5F: STOF 
IHMPUT "ARTIEELHUMMER CE=ENDE}", SUCH 
DE WHILE SUCHCHE 
LET = SUCH-1EaBE REM ADEESSEECHHUHNG 
IF 571 THEN Z1I20 
REM "rs DIREERT LESEHFERREREH 
GOSLUB Foa : FEM SATZZEIGER FECOETD# 
INPUT#1.RECII. HELEN. AFCHH, AFe4) 
FEN ###EHDE LESEFEFEHLEFRFER 
IF A$CLSSSCHRE$ 2252 THEN 2140 
PEINT "ARTIKEL" SUCH, "HICHT GEFUNDEN. " 
SOTO 2150 | 
FREINT "ARTIEELNUMMER: "iA$t1} 
FRIHT "BEZEICHNUNG: VASE. 
PRINT "EESTANDSMEHNGE: ";R$U2H 
FEINT "STUECKFREIS: "AFı4) 
IHPUT "ARTIEELNUMMER SO=ENDEN": SLCH 
LONF 
LLÜSE 1: ELÜSE 15 
FEINT "DATEI UHVWERRENDERT GESCHLOSSEN, " 
IMFUT "WEITER MIT RETUFH"; E#: GOTO 254 


FEN ###DATEI ANLEGEHFFERRERETEETREFFEEEEIEFEEENEE 
IMPUT "ANZAHL DER DATENSAETZE"; 5 


3 OFEH 15.98.15 : REM BEFEHLSKERANAL 
A OFEN RT} "+F&+".L, "+CHRFUSL} 
a FEINT "DATEI ";F#:" ERÜEFFNET." 


FEM ###DIFEKT SCHREEIEENFEEFREEE 

GOSUB Fan : REM SATZZEIGER RECORDE AUF 5 STELLEH 
FEIHT#L,CHREU EIS, 

FEM ###ENDE SCHREIEBEFEHLEFEES 

FEINT "LETZTER",S5:". SATZ LEER BESCHRIEBEN." 
CLÜSE 1: CLOSE 15 

FEINT "DATEI ";F#," GESCHLOSSEN." 

IHPUT "WEITER MIT RETURN"; E& : GOTO 230 
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3.9.2.3 Simulation der Anweisung DOPEN# mit BASIC 3.5 


Im vorangegangenen Abschnitt 3.9.2.2 haben wir den Direktzu- 
griff auf eine Artikeldatei anhand der Anweisungen DOPEN# und 
RECORD# erklärt. Wir taten dies, da DOPEN# und RECORD# einfach 
anzuwenden und darzustellen sind. Leider hat nur das BASIC 4.0 
der größeren Commodore-Computer (z.B. Serie 8000) diese zwei 
Anweisungen, nicht aber das BASIC 3.5 des Commodore 16 und 116 
sowie des Commodore plus/4. 


Gleichwohl lassen sich auch in BASIC 3.5 Direktzugriff-Dateien 
verwalten: wir simulieren dazu die zwei Anweisungen 
DOPEN# und RECORD#. In der Abbildung sind die zugehörigen An- 
weisungen in BASIC 4.0 und BASIC 3.5 gegenübergestellt. 


Direktzugriffdatei öffnen in BASIC 4.0: 


3020 DOPEN#1,(F$),L(SL) F$=Dateiname 
SL=Satzlänge 


Direktzugriff-Datei öffnen in BASIC 3.5: 


HE ‚Mm ii mm sim Hmm Hilmm ii: Hmm mm im ‚HE «mem HE: HE vi sim ri si Himmel m ME SEE ME ME 


3020 OPEN 15,8,15 | 15=Befehlskanal 
3030 OPEN 1,8,2,"0:"+F$+",L,"+CHR$(SL) 


Satzzeiger stellen in BASIC 4.0: 


ee en a 


3060 RECORD#1,I(5) S-Satznummer zum 
Zugriff 
Satzzeiger stellen in BASIC 3,5: 
3060 LET HIGHB= INT(S/256) P=Parameter 
3061 LET LOWB=S5-HIGHB*256 2=Sekundäradresse 


3062 PRINT#15,"P"+CHR$(96+2)+CHR$ (LOWB)+CHR$ (HIGHB)+CHR$ (1) 


Direktzugriff-Datei schließen in BASIC 4.0: 


GEN U UM EN MM: Gm ME (MEN (N (mm (mp: (ME Gm: SM: GM: GM: Gm: GM: GE ME: (HE: GE: (HR: “HE: GEN: GE GEN: GE: GE: HE: RE: iS "EEE:  HEES- -mE: ME: MN: EEE -HEG- ME: SEEN: = 


3100 DCLOSE#1 


Direktzugri£f- Datei schließen in BASIC 3.5: 
3100 CLOöSE 1 
3101 CLOSE 15 


Anweisungen DOPEN# und RECORD# in BASIC 4.0 und BASIC 3.5 


Der Commodore übergibt der Disketteneinheit (z.B. Floppy CBM 
1541) einen Befehlsstring für Aufgaben wie das Eröffnen einer 
Datei und das Setzen des internen Satzzeigers. Der String zum 
Erzeugen der Anweisung DOPEN# in BASIC 3.5 wird in der Abbil- 
dung dargestellt. 
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3020 OPEN 15,8,15 Befehlskanal eröffnen 
3030 OPEN 1,8,2,"0:"+F$+",L,"+CHR$(SL) 


Dateinummer 1. 
Gerätenummer B (Floppy) 
Sekundäradresse 2. 


Befehlsstring mit: 
Diskettenlaufwerk 0. 
=-Dateiname in F$. 
Parameter L für Länge. 
Datensatzlänge in SL.. 





Simuliert wird die Anweisung: 3030 DOPEN#1,F$,L(SL) 
Simulation der Anweisung DOPEN# 


Die Satzlänge darf maximal 254 betragen. Wollen wir eine 
Datei ne u anlegen, muß der gesamte Befehlsstring gesendet 
werden (Unterprogramm ab Zeile 3000). 

Soll die Datei später (zum Lesen oder Schreiben) geöffnet wer- 
den, so ist lediglich der Filename in F$ im String anzugeben 
(vgl. OPEN in den Zeilen 1020 und 2010). 


3.9.2.4 Simulation der Anweisung RECORD# mit BASIC 3.5 


Die Anweisung RECORD# zum Positionieren des Satzzeigers müssen 
wir mit BASIC 3.5 ebenfalls simulieren. Die Abbildung gibt den 
String zum Erzeugen der Anweisung RECORD# wieder. 


710 LET HIGHB=INT(S/256) : LET LOWB=S-HIGHB*256 
720 PRINT#15,"P"+CHR$(96+2)+CHR$ (LOWB)+CHR$ (HIGHB)+CHR$(1) 


Dateinummer 15 als Be- 
fehlskanal (Übertragen) 


Befehlsstring mit: 
Parameter P (Pointer). 
9 + Sekundäradresse 2. 
Satznummer 5 in Lowbyte 
und Highbyte zerlegt, 


Simulation der Anweisung RECORD# 


Das Positionieren des Satzzeigers wird über den Befehlskanal 
15 gesendet. Die Sekundäradresse 2 entspricht der unter OPEN 
angegebenen Adresse. 

wichtig ist, daß die Satznummer (hier in S) als 2-Byte-Adresse 
in ein nieder- und ein höherwertiges Byte aufgeteilt (vgl. da- 
zu Abschnitt 3.5.5.1) wird. 
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In Programm DIREKT-DATEII ist die Simulation von RECORD# im 
Unterprogramm ab Zeile 700 programmiert. Grund: RECORD# wird 
beim Anlegen, Lesen wie auch Schreiben von Sätzen in die Datei 
benötigt. 


Ausführung zu Programm DIREKT-DATEII: 


RUN /RET/ /RET/ für RETURN 
VERWALTUNG EINER ARTIKELDATEI 

UEBER DIREKTZUGRIFF IN BASIC 3.5. 

DATEINAME, SATZLAENGE? ARTIKELDATEI, 36 /RET/ 


MENUE ARTIKELVERWALTUNG 


0 = ENDE DES PROGRAMMS 
1 = DATENSAETZE DIREKT SCHREIBEN 
2 = DATENSAETZE DIREKT LESEN 

3 = RELATIVE DATEI LEER ANLEGEN 
? 3 /RET/ 


ANZAHL DER DATENSAETZE? 20 /RET/ 
DATEI DIREKTDATEI EROEFFNET. 
LETZTER 20. SATZ LEER BESCHRIEBEN. 
DATEI ARTDATEI GESCHLOSSEN. 

WEITER MIT RETURN /RET/ 


MENUE ARTIKELVERWALTUNG 

ENDE DES PROGRAMMS 
DATENSAETZE DIREKT SCHREIBEN 
DAENSAETZE DIREKT LESEN 
RELATIVE DATEI LEER ANLEGEN 
/RET/ 


WNnN—o 
u | Be | u | u | 


SAETZE SCHREIBEN (O=ENDE) 
NUMMER, BEZ., BESTAND, PREIS: 
? 1019,STUHL,21,79.50 /RET/ 
NUMMER, BEZ., BESTAND, PREIS: 
? 1002,SESSEL,12,260.90 /RET/ 
NUMMER, BEZ., BESTAND, PREIS: 
0,0,0,0 /RET/ 

ARTIKELDATEI GESCHLOSSEN. 
WEITER MIT RETURN /RET/ 


MENUE ARTIKELVERWALTUNG 


0 = ENDE DES PROGRAMMS 
1 = DATENSAETZE DIREKT SCHREIBEN 
2 = DAENSAEFTZE DIREKT LESEN 

3 = RELATIVE DATEI LEER ANLEGEN 
? 2 /RET/ 


ARTIKELNUMMER (O=ENDE)? 1004 /RET/ 
ARTIKEL 1004 NICHT GEFUNDEN. 
ARTIKELNUMMER (O=ENDE)? 1019 /RET/ 
ARTIKELNUMMER: 1019 

BEZEICHNUNG: STUHL 
BESTANDSMENGE: 21 

STUCKPREIS: 79.50 
ARTIKELNUMMER (O=ENDE)? 0 /RET/ 
DATEI UNVERAENERT GESCHLOSSEN. 
WEITER MIT RETURN ... 
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3.9.2.5 Datensatzweiser Datenverkehr 


Das Datenverwaltungsprogramm SEQUENT-DATEII (Abschnitt 3.9.1) 
sieht den dat e i we is en Datenverkehr vor: zu Beginn 
wird die gesamte Datei in den Hauptspeicher eingelesen und in 
Arrays abgelegt. Das bedeutet, daß die Datei nicht größer als 
der im Hauptspeicher verfügbare Speicherplatz sein darf. 


Im Programm DIREKT-DATEII hingegen wird jeweils unmittelbar 
nach der Anforderung ein Satz geschrieben oder aber gelesen. 
Wir sprechen vom datensat zwei s en Datenverkehr. 
Die ARTIKELDATEI kann somit jetzt größer sein als der verfüg- 
bare Hauptspeicherplatz, da zwischen dem externen und dem in- 
ternen Speicher stets nur e i n Datensatz transportiert wird. 
Wie zeigt sich der datensatzweise Datenverkehr in der BASIC- 
Codierung? In j e de m (Unter-)Programmfindet sich minde- 
stens eine Anweisung mit Dateizugriff, also mit einer PRINT#- 
oder INPUT#-Anweisung. 


Datenverkehr 
dateiweise: datensatzweise: 
- Gesamte Datei gelesen - Jeweils nur ein Satz 
bzw. geschrieben gelesen bzw. geschrieben 
- Datei muß kleiner sein - Datei kann größer sein 
als der Hauptspeicher als der Hauptspeicher 


Dateiweiser und datensatzweiser Datenverkehr 


3.9.2.6 Direkte Adressierung des Datensatzes 


Artikel 1019 ist als 19. Satz in der Artikeldatei gespeichert, 
Artikel 1001 als 1. Satz, Artikel 1034 als 34. Satz. Die zeit- 
liche Reihenfolge der Speicherung spielt keine Rolle. Solange 
z.B. für den 'dazwischengehörenden' Artikel 1007 kein Satz ge- 
speichert ist, bleibt der entsprechende Speicherplatz auf der 
Diskette eben leer - es entstehen Lücken. Die schlechte 
Ausnutzung des Speicherplatzes ist sicher ein Nachteil der Di- 
rektzugriff-Datei. 


Der rechnerische Zusammenhang 


"Satznummer S ergibt sich aus Artikelnummer minus 1000" 


1090 LET S=VAL(A$(1))-1000 (im Schreibprogramm) 
2050 LET S=SUCH-1000 (im Leseprogramm) 


wird als Adreßrechn ung bezeichnet. Diese Adreß- 
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rechnung stellt einen umkehrbaren Zusammenhang zwischen der 
Artikelnummer als Ordnungsbegriff einerseits und der relativen 
Satznummer als Speicherort andererseits her. "'Umkehrbar', weil 
aus der Satznummer (z.B. 119. Satz) die zugehörige Artikelnum- 
mer abgeleitet werden kann (also 1119). Man bezeichnet diese 
umkehrbare Adreßrechnung als di rek t e Adressierung. 


Die Adreßrechnung muß v or dem Dateizugriff vorgenommen wer- 
den, d.h. vor jeder PRINT#- oder INPUT#-Anweisung: 


- In Unterprogramm SAETZE SCHREIBEN bewirken die Anweisungen 
1090 LET S=VAL(A$(1))-1000 
1120 GOSUB 700 : REM Simulation von RECORD#1,(S), 
1130 PRINT#1,A$(1);CHR$(13);A$(2);CHR$(13);... 
daß nach Berechnung der Satznummer S in Zeile 1090 (für Ar- 
tikelnummer A$(1)=1019 wird S=19) der Datensatz als 19. Satz 
direkt in die ARTIKELDATEI geschrieben wird. 
- In Unterprogramm SAETZE LESEN bewirkt die Anweisungsfolge 
2050 LET S=SUCH-1000 
2080 GOSUB 700 : REM Simulation von RECORD#1,(S) 
2090 INPUT#1,A$(1),A$(2),A$(3),A$(4) 
dementsprechend, daß nach Ermittlung der Satzadresse S aus 
dem Suchbegriff SUCH der S. Datensatz direkt gelesen wird. 


Struktogramm zum Unterprogramm SAETZE SCHREIBEN des 
Programmes DIREKT-DATEI]: 


Artikeldatei namens ARTIKELDATEI eröffnen 
Satz eintippen und nach A$(1),A$(2),A$(3),A$(4) zuweisen 


Wenn Nummmer A$(1) gleich null, dann Ende 


Adreßrechnung: Satznummer S = Artikelnummer - 1000 


Satzzeiger mittels RECORD auf S positionieren 
Datensatz in die Datei direkt schreiben 


ARTIKELDATEI erweitert wieder schließen 
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Struktogramm zum UNTERPROGRAMM SAETZE LESEN des 
Programmes DIREKT-DATEII]: 


ARTIKELDATEI eröffnen als Direktzugriff-Datei mit Länge 36 


Zu suchende Artikelnummer SUCH eintippen 








Wenn SUCH=0 dann Ende 





Adreßrechnung durchführen: S = SUCH - 1000 


Artikelsatz mit Satznummer S direkt lesen 


OT Satz gefunden? 
Satzkomponenten Fehlerhinweis 
A$(1)-A$(4) zeigen ausgeben 


ARTIKELDATEI unverändert wieder schließen 


3.9.2.7 Indirekte Adressierung des Datensatzes 


Das Adreßrechnungsverfahren der direkten Adressierung 
ist ungeeignet, wenn der Ordnungsbegriff einer Datei streut. 
Betrachten wir dazu als Beispiel die folgende Artikeldatei: 

Kleinste Artikelnummer 1, 

größte Artikelnummer 30000, 

insgesamt 2000 Artikel im Sortiment, 

"SatzNr = ArtNr" als Adreßrechnung. 
Für die zum Beispiel nur 2000 Artikel müßten 300000 Artikel- 
sätze in der Datei bereitgestellt werden. Das Adreßrechnungs- 
verfahren der direkt en Adressierung ist hier also un- 
geeignet. Aus diesem Grunde wird bei Streuung des Ordnungsbe- 
griffes ein Verfahren der indirekten Adressierung 
gewählt wie z.B. das Divisions-Rest-Verfahren. Dabei entsteht 
das Problem, daß für zwei Ordnungbegriffe dieselbe Satznummer 
berechnet wird. Es kann zu Doppelbelegung bzw. Überläufern 
kommen, die natürlich gesondert gespeichert werden müssen. 
Im Zusammenhang mit der indirekten Adressierung spricht man 
auch von Ha sh ing (übersetzt: etwa "Mischmasch') bzw. 
vom Hash-Code. 
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Zwei Adreßrechnungs-Arten: Direkte und indirekte Adressierung 


Die indirekte Adressierung ist auch stets dann angezeigt, wenn 
ein klassif izierende r Ordnungsbegriff ange- 
wendet wird. Als Beispiel betrachten wir in der Abbildung eine 
Artikelnummer mit acht Stellen. 





Artikelnummer als klassifizierender Ordnungsbegriff 
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3.10 Grafikverarbeitung 


3.10.1 Grafik-Modi im Überblick 


Beim Commodore sind zunächst zwei grundsätzlich verschiedene 
Grafik-Betriebsarten zu unterscheiden: Auf der einen Seite die 
Text - Graf ik ,„ bei der nur Zeichen (Ziffern, Buch- 
staben, Sonder- und Grafikzeichen) dargestellt werden, und auf 
der anderen Seite die Pixe|1l - Graf ik zur Darstel- 
lung von einzelnen Bildpunkten als sog. Pixeln. 


Commodore-Grafik 


Text-Grafik Pixel-Grafik 


- 40 Spalten senkrecht - 320 Spalten senkrecht 
von links nach rechts, von links nach rechts. 

- 25 Zeilen waagerecht - 200 Zeilen waagerecht 
von oben nach unten, von oben nach unten. 

- 40*25=1000 Zeichen - 320*200=6400 Pixel bzw. 
insgesamt, als Bildpunkte insgesamt. 


“als Zeichen “>als Pixel 





Zeichen bzw. Pixel als kleinste grafische Einheit 


Bei der Text-Grafik ist das Zeichen die kleinste programmier- 
bare Einheit. Es kann von uns nicht weiter unterteilt werden. 
Jedes Zeichen setzt sich aus 8%8=64 Punkten zusammen. Bei der 
Pixel-Grafik können wir diese kleinen Punkte einzeln 
ansprechen und manipulieren. In jeder Zeile stehen 320 Punkte 
nebeneinander (8*%40=320). Da genau 200 Punkte untereinander- 
stehen (8*%25=200), sind insgesamt 64000 Bildpunkte bzw. Pixeln 


(320*200=64000) von uns auf dem Bildschirm direkt adressierbar 
(Grafik-Modus 1). 
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Mit der GRAPHIC-Anweisung können wir die fünf in der Abbildung 
wiedergegebenen Grafik-Modi Text, Hires, Hires+Text, Mehrfar- 
ben und Mehrfarben+Text ansteuern. 


100 GRAPHIC Modus („Löschen) 


— Grafik-Modus 0,1,2,3 und 4: 

Text-Grafik 

Hochauflösende Grafik (HIRES-Grafik) 
HIRES-Grafik und Text-Grafik 
Mehrfarben-Grafik 

Mehrfarben-Grafik und Text-Grafik 


Du FR EZ 4 Eu SE ee 


Bildschirm beim Umschalten löschen: 
I Bildschirm löschen (O=nicht löschen 
als Standard bzw. Default). 


125 GRAPHIC 1,1 HIRES-Grafik an und Bildschirm löschen. 
137 GRAPHIC 0 In Text-Grafik zurück ohne löschen. 


GRAPHIC-Anweisung zum Ansteuern der fünf Grafik-Modi 


Beim Grafik-Modus 1 steht uns der gesamte Bildschirm mit 64000 
Bildpunkten zur Verfügung. Bei den Modi 2 und 4 hingegen liegt 
ein geteilter Bildschirm vor. Dabei wird 
unten am Bildschirm ein Text-Bereich von 5 Zeichen/Zeilen bzw. 
40 Pixeln (5%8-=-40) Höhe abgeteilt. Der obere Grafik-Bereich 
ist somit 'nur' noch 20 Zeilen bzw. 160 Pixeln hoch. Der ge- 
teilte Bildschirm hat den Vorteil, daß erläuternde Texte zum 
Programmablauf in den unteren Bildschirmzeilen sichtbar blei- 
ben. Dies geschieht natürlich auf Kosten des kleineren Grafik- 
Bereiches von 160 gegenüber 200 Pixel-Zeilen. 


Grafik auf dem Bildschirm 


Geteilter Bildschirm Reiner Grafik-Bildschirm 


are Sen =G 


159 Fixel-Bereich 


Text-Bereich 





GRAPHIC 2 bzw. GRAPHIC 4 GRAPHIC I bzw. GRAPHIC 3 


Pixel-Text-Modi 2 und 4 sowie reine Pixel-Modi 1 und 3 
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Arbeiten wir mit der Pixel-Grafik, wird ein Grafik-Speicherbe- 
reich von 10 KByte Größe am Anfang des RAM automatisch einge- 
richtet. Der BASIC-Speicherbereich (vgl. Abschnitt 3.5.5) wird 
dadurch im RAM "nach oben in Richtung höherer Adressen' ver- 
legt. Die Pixel-Grafik mit ihren 64000 Bildpunkten ist äußerst 
speicherplatzaufwendig. 


Im folgenden gehen wir auf die einzelnen Grafik-Anweisungen an 
Beispielprogrammen ein. Es ist eine gute Ubung, die Programme 
selbst auszuprobieren, zu ändern bzw. zu erweitern. 


Um die Grafik nicht sofort vom Bildschirm verschwinden zu las- 
sen, wird jeweils die Anweisung GETKEY E$ vorgesehen. Damit 
"wartet" das Grafikprogramm jeweils so lange, bis irgend eine 
Taste gedrückt wird. 


3.10.2 Linien und Punkte mit DRAW 


3.10.2.1 Durchgehende Linie 


Das Programm DRAW-TESTI verdeutlicht uns das Gliederungsprin- 
zip j ed e s Grafikprogramms: Vorbereitungen, Grafik-Modus 
einschalten, Grafik ausgeben und Rückkehr in den Text-Modus. 


Schritt T; PorereF tungen treffen 
- Zeilen 190-230 
- Koordinaten der Punkte Pi und P2 festlegen 


Schritt 2: Grafik-Modus einschalten 
- 240 GRAPHIC 2, - 
- Grafik-Modus 2: "Hires-Grafik mit Text", also geteilter 
Bildschirm 


Schritt 2: Grafik ausgeben 


Er em mer em fee me me fee je fleeie Dmimr fame me he dien a a m m 


- Zeilen 250-330 
- Mit DRAW: Zwei Linien und ein Punkt in Pixel-Bereich oben 
- Mit PRINT: Drei Textzeilen in Text-Bereich unten 


Schritt 4: Grafik-Modus ausschalten 


En m m u nn Ge es m Emm mE; Im im: m Hmm mE mi Hm ‚ME MEMEL HMMmEN HmmmE: mE HmmEN SAMEN, ‚Mm TamMmE—: Timm fm BB: <A: Sm 


- 340 GRAPHIC 0,1] 
- In Text-Modus 0 zurückkehren und dabei Bildschirm löschen 


4-Schritte-Gliegerung jedes Grafikprogrammes 
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Codierung zu Programm DRAW-TEST]I: 


a REM ======PRÖGEAMM DRAU-TESTI 
FRINT "LINIE UND FUHET MITTELS DRAW ZEICHNER" 


FEIHT "MODUS 2: HÖCHAUFLOESENDE GRAFIK + TEAT2": FRIMT 


Eat) 
EAN 


REM ====== VEREINBARUNGSTEIL 


kREM 51.52: SPALTEN W32@ HEBEHEINNDER: 
21,22: ZEILEN (ZB UHTEREINANDER> 


REM 


FEN ====== ANWEISUNGSTEIL 

FEIHT "KOORDINATEN DER PUNETE =; 
FREIHT "SPALTE S=8-312, ZEILE Zei 
IHFUT "PUNKT PiES1.21>",: Si,el 
INFUT "PUHET P2iS2,22>", SE.E2 
FREIHT "WEITER?":: GETKET E# 


. 
ge 
[2 


199." 


IYRIfR) Ri m me m je pe ei et pe 
pe ON CHLN Bi fl em 
Da A CD 


In. 
c 


248 GRAPHIC 2.1 
259 FRINT "1. LINIE YO PL NACH PZ" 
250 DRAM 1,51,21 TO 82.22 


278 GETKET E# 

zea FRINT "2. LINIE WON PZ NACH Pselea. 1a" 

234 DRAU 1 TO 162. 10 

398 GETKET E% 

318 FEINT "3. MITTELPUNKT DES GEAFIE-BEREICHES F4" 
328 DRAW 1.164,56 

334 GETEET E% 

344 GEAPHIC 8,1 

35@ PRINT "EHDE.": EHI 


Mit 240 GRAPHIC 2,1 schalten wir den Grafik-Modus 2 ein: Der 
Bildschirm wird gelöscht und in zwei Bereiche geteilt: 


- Pixel-Bereich oben mit 320 Spalten (0-319) nebeneinander 
und 159 Zeilen (0-159) untereinander. 
Der Pixel-Cursor steht unsichtbar in der Position (X=0,Y=0), 
d.h. ganz oben links am Bildschirm. 


- Text-Bereich unten auf dem Bildschirm mit 40 Spalten (0-39) 
nebeneinander und 5 Zeilen untereinander. 
Der Text-Cursor (dies ist unser "altbekannter' Cursor) steht 
sichtbar blinkend unter dem READY.-Prompt unten links in der 
zweiten Textzeile. 


Wichtig ist, daß der Pixe]l - Cursor stets unsicht- 
bar bleibt und nur dann in Erscheinung tritt, wenn gerade ge- 
zeichnet wird. 


Wir lassen das Programm DRAW-TESTI mit den zwei Eingabewerten 
P1(20,140) und P2(300,10) laufen. Wo liegt der Punkt P1? Stets 
vom Punkt P(0,0) oben links ausgehend gehen wir 20 Pixel nach 
rechts (X1=20) und dann 140 Pixel nach unten (Y1=140). Anders 
als in der Mathematik üblich stellt der linke obere Eckpunkt 
den Nullpunkt dar, von dem aus nach rechts (X von 0 bis 319) 
und nach unten (Y von 0 bis 199) in positiver Richtung gezählt 
wird. Am Bildschirm steht dann die in der Abbildung wiederge- 
gebene Information. 
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P1(20,140) 
P2(300,10) 
P3(160,100) 
P4(160,80) 


Fixel-Bereich 
(Ausgabe mit 


DRAW) 
P1 
1. LINIE VON P1 NACH P2 Text-Bereich 
2. LINIE VON P2 NACH P3(160,100) (Ausgabe mit 
3. MITTELPUNKT DES GRAFIK-BEREICHES PA4 PRINT) 


READY. 
\Cc 





Ausführung zu DRAW-TEST1: Inhalt des geteilten Bildschirmes 


P1(0,100), P2(319,100) Waagerechte Linie (quer). 


- P1(0,199), P2(319,0) Linie von links unten nach rechts 
oben (fängt später an, da unten 
der 5-Zeilen-Textbereich verdeckt) 


- P1(0,159), P2(319,159) Waagerechte Linie unmittelbar über 
dem Text-Bereich (Grenzlinie). 


P1(0,160), P2(319,160) Waagerechte Linie nicht sichtbar, 
da bereits im Text-Bereich. 


Mit der DRAW-Anweisung können wir eine Linie zwischen zwei an- 
gegebenen Punkten, zwischen der aktuellen Cursorposition und 
einem Punkt oder einen Einzelpunkt zeichnen. In der Abbildung 
werden diese drei Möglichkeiten anhand von Programm DRAW-TESTI 
dargestellt. 


DRAW-Anweisung: Zeichne eine Linie „..: 


MEN: mE: HMM Hmm HM AM. HE. GE CE GA GE: GE: GE: a = u = = = = = = = = = = _ = _ _ _ = _ ... 


260 DRAW 1,51,21 TO 52,22 .„... vom Anfangspunkt (51,21) zum 
zum Endpunkt (52,22) 


290 DRAW I TO 160,100 ... von der Cursorposition, d.h. 
(S2,22) zum Endpunkt (160,100) 


320 DRAW 1,160,80 „.. den einen Punkt (160,80), 
da Anfangspunkt = Endpunkt 


Ausführung von DRAW-TEST1: (S1,21)=(20,140), (S2,22)=(300,10) 


Drei grundlegende Anwendungen der DRAW-Anweisung 
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3.10.2.2 Zeichnen im Direkt-Modus 


Alle Grafik-Anweisungen können im Programm-Modus (mit Zeilen- 
nummern innerhalb eines Programms) wie auch im Direkt-Modus 
(ohne Zeilennummer) eingegeben werden. Zur Übung nehmen wir 
folgenden direkten Dialog vor: 


Direktanweisung: Bedeutung: 
Commodore einschalten (/RET/ bedeutet RETURN-Taste) 
GRAPHIC 2,1 /RET/ Text-Cursor blinkt links unten. 


DRAW 1 TO 160,100 /RET/ Linie vom Eckpunkt links oben zur 
Bildschirmmitte: von (0,0) nach 
(160,100). 

DRAW TO 319,0 /RET/ Zweite Linie von (160,100) zum 
Eckpunkt rechts oben (319,0). 

DRAW 1,160,0 TO 160,159 /RET/ Dritte Linie von Bildschirm- 
mitte oben senkrecht nach unten | 
bis zum Beginn des Text-Bereiches. 

DRAW 1,+40,-20 TO 0,0 /RET/ Von der aktuellen Position 
des Pixel-Cursors (160,159) ausge- 
hend um 40 nach rechts und um 20 
nach oben gehen und eine Linie zum 
Nullpunkt ziehen. 

DRAW 0 TO 160,100 /RET/ Die erste Linie wieder löschen. 

GRAPHIC 0,1 J/RET/ Rückkehr in Text-Modus 0. 


Da mit dem Grafik-Modus 2 ein geteilter Bildschirm eingerich- 
tet wird, werden alle von uns d i re kt eingetippten DRAW- 
Anweisungen in den unteren fünf Bildschirmzeilen protokolliert 
(neue Zeilen "rutschen! nach oben). Im Grafik-Modus 1 hingegen 
können solche Direktanweisungen nicht mitverfolgt werden. 


In Grafik-Anweisungen können wir Koordinaten entweder absolut 
oder relativ zur aktuellen Cursorposition angeben. 


Absolut-Positionierung: 


m u sn 


——— — Startpunkt (40,20) 
—— Endpunkt (160,100) 


Relativ-Positionierung: 


Startpunkt 40 Pixel rechts und 
20 Pixel oberhalb der aktuellen 
Cursorposition. 

Endpunkt mit (160,100) 





Bewegungsrichtungen /X: + rechts, - links//Y: + unten, - oben/ 


Positionierung des Pixel-Cursors "absolut' oder 'relativ' 
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3.10.2.3 Linie und Bewegung 


Im Programm LINIE-BEWEG1 wird die DRAW-Anweisung in eine FOR- 
NEXT-Schleife gesetzt, um bei jedem Schleifendurchlauf einen 
neuen Punkt zu zeichnen. Löscht man jeden gerade gezeichneten 
Punkt wieder, ergibt sich der Effekt eines sich auf dem Bild- 
schirm bewegenden Punktes. Läßt man die Punkte stehen, so ent- 
steht eine immer länger werdende Linie. 


DRAW-Anweisung in einer Schleife 


Linie zeichnen Punkt bewegen 


— _— = = = HE: IM mm. (mE mE im mm HEN ME dämmen Fe ji m 


160 LOCATE 0,ZEILE 


190 FOR SPALTE=0 TO S1 250 FOR SPALTE=0 TO SI 
200 DRAW 1 TO SPALTE, ZEILE 260 DRAW 1, SPALTE,ZEILE 
210 NEXT SPALTE 270 DRAW 0, SPALTE,ZEILE 


280 NEXT SPALTE 
Werte in Programm LINIE-BEWEG1: ZEILE=100 und z.B. S1=300 
Punkt für Punkt zeichnen mit der DRAW-Anweisung 


Im Programm LINIE-BEWEGI kehren wir die standardmäßig vorgege- 
bene Farbeinstellung um: Mit 120 COLOR 0,1 wird der Hinter- 
grund schwarz und mit 130 COLOR 1,2 der Vordergrund weiß ge- 
wählt. Grafische Darstellungen sind "weiß auf schwarz" häufig 
besser lesbar. 


Codierung zu Programm LINIE-BEWEG1: 


194 REM ====== PEÜGEAMM LINIE-BEMEGI 

118 INPUT "ENTFERHUNG VOM LINKEN RAND", 51 
120 COLOR 8,1 : FEM HINTERGRUND SCHWARZ 
1394 COLOR 1,2 : FEM ZEICHEN WEISS 

148 GEAPHIC 1,1: REM HOCHAUFL. GEAFIK 
152 LET ZEILE=190 

162 LOCHTE 3,ZEILE 

Ira 

152 REM %#%# LINIE WIED GEZEICHNET KREREH 
120 FOR SPALTE=O TO =1 

238 DRAW 1 TO SPALTE. ZEILE 

Z18 NEAT SFALTE 

22a GETEET E# 

25a REM #4% PUHKT BEWEGT SICH EREREFEREERNE 
249 SCHCLR 

25a FÜR SPALTE=B TO 51 

zei DRAU 1. SFALTE.ZEILE 

a DEAU A. SPALTE.ZEILE 'EEM LÜESCHEN 
a HE=T SFALTE 

a GETEET E$ 

a GERAFHIT 9 

la COLOR a.2: COLOR 1,1 
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Zur Ausführung von Programm LINIE-BEWEGI: 

Anders als im Programm DRAW-TESTI wird in LINIE-BEWEGI mit der 
Anweisung 140 GRAPHIC 1,1 kein geteilter Bildschirm gewählt, 
sondern einen "reinen' Grafik-Bildschirm mit 320 Spalten und 

200 Zeilen. Nach der Eingabe von z.B. 300 für S1I wird der ge- 
samte Bildschirm gelöscht und zuerst eine waagerechte Linie in 
Bildschirmmitte von (0,100) nach (300,100) gezeichnet. Danach 
bewegt sich ein Punkt von links nach rechts entlang derselben 
Linie. 


Mit der Anweisung 160 LOCATE 0,Z2EILE positionieren wir den 
Pixel-Cursor auf den Punkt (X=0,Y=ZEILE). Dies ist notwendig, 
da die DRAW-Anweisung in der Zählerschleife 190-210 von der 
aktuellen Cursorposition ausgeht. 


3.10.3 Funktion bzw. Kurve 


Das Programm KURVEI dient dem Zeichnen von Parabeln der Form 
Y= A* + BX + C 


im Grafik-Modus 2, also in 'Hires-Grafik mit geteiltem Bild- 
schirm'. Der Mittelpunkt des Koordinatenkreuzes wird auf den 
Mittelpunkt des Bildschirmes gelegt (Zeile 240 (X0=160,Y0=100) 
als Spalten- und Zeilenwerte). Das Koordinatenkreuz zeichnen 
wir in den Zeilen 260-270. Innerhalb der WHILE-Schleife in den 

Zeilen 300-410 können wir Parameterwerte A,B und C eintippen. 

Die eingetippten Werte werden im Text-Bereich unten am Bild- 

schirm gezeigt, während im Pixel-Bereich oben am Bildschirm 

die zugehörige Kurve gezeichnet wird. Wir können die Parabel 

(je nach Inhalt von E$) auf zwei Arten zeichnen: 

- Für E$="N" werden einzelne Punkte gezeichnet. Da diese Punk- 
te nicht unbedingt dicht nebeneinander liegen, erscheint die 
Kurve etwas 'gepünktelt'. 

- Für E$="J" werden die Punkte verbunden, wodurch die Kurve 
ein etwas 'treppenartiges' Aussehen erhält. 


Codierung zu Programm KURVEI: 


1ag REM ======FROGERAMM KURVEI 
11a PRINT "PARABEL TH # A122 + BA + L 
124 FREINT "MIT HOCHAUFLOESENDER GREAFIK.": FRINT 


149 REM ======VYEREINERRUNGSTEIL 
1593 REM A.R.C: PRERAMETER 
164 REM TO.ag: HULLFUHNETEÖOGRDIATEH 


a REM @,#l. vl: FARABEL-KOÖORDINAATEN 
a REM FLAGGE: HILFSYARIELE EÜOOLESCH 
a REM A$.E$: EINGAFESTELIERUNG 
a: 


Fa 5 12 © 
Oo) 1 


3.10 Grafik 275 


21A REM ======ANWEISUNGSTEIL 

22a INPUT "BILDPUNKTE WERBINDEN Je" :E$ 
230 PRINT "WMEITER?";: GETKET A$ 

240 LET #0=160: LET Y79=199 

258 GRAFHIC 2,1 

268 DRAU 1.0.78 TO 313,78 

era DRAU 1.38.8 TO %0,1393 

Sn INFUT "A.B.C (777=ENDEN"SR,E,C 

238: 

388 DO WHILE A<>777 

sla LET A=Rr/28: LET K=Rkza: REM AUSDEHHUNG PASSEN 
328 LET FLAGGE=O 

330 FÜR K=-Aa TO &B 


348 LET Yapkakı + BEX + 5 

330 IF v>Y8 OR T<-Ta THEN 3380 

364 IF FLAGGE=G THEN LET AlsAcg+a#: LET Ti=rd-T: LET FLAGGE=-1 
Jr IF E$="J" THEN DRAW 1.A1,Y1 TO Kork, Ta-T: ELSE DRAW 1.51, 71 
330 LET A1l=A0+#: LET T1=YO-" 


3378  NEKT # 

aaa INPUT "A,B,C <777=ENDEN";A,B,C 
418 LOOP 

428 : 

433 GRAFHIL 6.1 

444 PRINT "ENDE.": END 


Ausführung zu Programm KURVE mit vierfachem Schleifendurchlauf 
und den folgenden Eingabewerten: 


A,B,C (777=ENDE)? 0,1,1 /RET/ 


[4 
A,B,C (777=ENDE)? 1,0,0 /RET/ (Dieser Dialog steht 
A,B,C (777=ENDE)? -1,0,0 /RET/ im Text-Bereich des 
A,B,C (777=ENDE)? 0.25,1,-1 /RET/ Bildschirmes unten) 
A,B,C (777=ENDE)? 777,0,0 /RET/ 


Im Pixel-Bereich des Bildschirmes erscheinen diese vier Kurven: 


7, 
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3.10.4 Rechtecke und Quadrate mit BOX 


Mit der BOX-Anweisung können Rechtecke gezeichnet und gedreht 
werden. Ein Rechteck wird dabei durch die Angabe der Eckpunkte 
"links oben' sowie "rechts unten' definiert. Im folgenden Pro- 
gramm BOX-TESTI können wir beliebige Rechtecke definieren und 
gedreht zeichnen. Nach dem Zeichnen eines Rechteckes steht der 
Pixel-Cursor (wie immer unsichtbar) im Eckpunkt "rechts unten’ 
und kann von dieser Position aus weiterbewegt werden. Mit der 
Anweisung 200 DRAW 1 TO 319,0 entsteht deshalb eine Gerade 
von diesem Eckpunkt aus zur rechten oberen Bildäschirmecke. 


Ausführung zu Programm BOX-TESTI: 


(Pixel-Bereich) 


ECKE LINKS OBEN (-1=ENDE)? 30,20 /RET/ (Text-Bereich) 
ECKE RECHTS UNTEN? 79,100 /RET/ 
DREHWINKEL IN GRAD? 90 /RET/ zuvor 0 bzw. 45 





180 BOX ‚„Y1,X1,Y2,X2,DREH,O 


Farbzone 1 als Standard. 
Eckpunkt oben links. 
Eckpunkt unten rechts. 


Drehwinkel (Standard: 0 Grad bei 
12 Uhr); Drehen im Uhrzeigersinn. 





-Standard=0: Umriß zeichnen 
Angabe=1: Mit Farbe füllen 


Anweisung BOX zum Zeichnen, Drehen und Einfärben 


196 REM ======PROGRAMM BOX-TESTI 

118 PRINT "RECHTECKE TESTEN MITTELS ANWEISUNG BOR." 
126 GRAPHIC 2,1 

138 DO 

148 INPUT "ECKE LINKS OBEN <-I=ENDE> "ıri,al 
1560 IF 71X8 THEN EXIT 

160 INPUT "ECKE RECHTS UNTEN"; TY2, RZ 

179 INPUT "DREHWINKEL IN GRAD", DREH 

136 BÜRx ‚r1,#%1, 72,42, DREH 

128 LDOP 

280 DRAW 1 TO 319,0 

218 PRINT "WEITER?";: GETKET E$ 

220 GRAPHIC 8,1 

234 PRINT "ENDE.": END 
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3.10.5 Kreise und Ellipsen mit CIRCLE 


3.10.5.1 Kreise und Teilkreise 


Das Programm CIRCLE-TESTI enthält fünf Unterprogramme, die al- 
le über ein Menü aufgerufen werden. Das erste Unterprogramm in 
den 1000er-Zeilen dient dazu, Kreise und Kreisausschnitte mit 
der Anweisung CIRCLE zu zeichnen. Die vollständige Definition 
der CIRCLE-Anweisung wurde in Abschnitt 2.3.2.4 gegeben. Hier 
einige Ausführungsbeispiele zum Unterprogramm "KREIS' in den 
1000er-Zeilen: 


X,Y: BREITE: HOEHE: Bil: B2:; Zeichnung: 


160,100 80 80 0 360 Ellipse, da Bildschirm nicht 
quadratisch. 

160,100 80 50 0 360 Kreis (HOEHE=50 = 5/8 * 80) 

160,100 80 50 90 270 Unterer Halbkreis '"Schüssel' 

160,100 80 50 0 180 Rechter Halbkreis 


Codierung zu Programm CIRCLE-TEST!I: 


102 REM ======PROGERMM CIRCLE-TESTI 

i1& FRINT "KREISE EZW. ELLIPSEN MIT DER ANWEISUNG" 
128 PRINT "CIRCLE ZEICHNEN SHOHE AUFLOESUNG)." 
132 DO 

148 FRINT "a ENDE DER DEMONSTRATION" 

158 PRINT "1 ENZELNE KREISE ZEICHNEN" 

1658 PRINT "2 KREIS IM KREIS (RADIUS ABNEHMEND>" 
178 FRINT "3 EKREIS IM KREIS (RADIUS ZUNEHMEND} " 
132 FRINT "4 KREISSEGMENTE SWELLENFORM}" 

136 FREINT "5 KREISSEGMENTE <AL> TORTENSTUECKE" 
zaa INFUT "WAHL 8-5",E$: LET E=YAL(CES> 

219 SCHELR 

228 ON E GOSUB Ida, z000. 5900. 4aaa, 5808 

238 IF E=9 THEN EAIT 


248 LOOP 

258 PEINT "ENDE." END 

Zen: 

a 

1065 REM ======LHNTERFROÜGRAMM “KREIS” 


ic18 INPUT "KOORDIATEN &,'Y (1860, 1A8=MITTE3" 3%, 
1u20 INPUT "RADIUS BREITE <SÜ=ENDE>"SEREITE 

1538 DO WHILE BREITEX>S 

ias48  IHMFUT "RADIUS HOEHE", HÜEHE 

1850 IMPUT "BOGENANFANG, -ENDE Ca. 358=GAHNZER BOGEN>",;EL,EZ 
1050  GEAPHIC 1,1 

ia7a  CIRFCLE 1.8: Y,EREITE,HOEHE, BI. BE 

3 GETEET E$ 

A GERAFHIC 8,1 

aA INPUT "RADIUS BEEITE CB=ENDE>"SBREITE 

a LOUF 

3 RETURN 
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Codierung zu Programm CIRCLE-TESTI (Fortsetzung): 


11538 
2008 
281 


REM ======UNTERPROGRAMM "KREIS IM KREIS’ 
INPUT "RADIEN YON 160 BIS 1 MIT SCHRITT (Z.B.-189" SCHRITT 
GRAFHIC 1,1 
FOR RADIUS=168 TU 1 STEP SCHRITT 
CHAR 1,0,2,STE$CRADIUS>: LET Z=e2tl 
CIRCLE 1,168.1%8, RADIUS 
NEAT RADIUS 
GETEET E$ 
SRAFHIC 2.1 
RETURN 


REM ======1INTERFROGRMM “HOEHE-BREITE “ 
PRINT "VERHRELTNIS HOEHE’BREITE YON 8.1 BIS 2" 


a INPUT "MIT SCHRITTWEITE" SCHRITT 


INPUT "ALTEN KREIS LOESCHEN CT/N>";L$ 
GRAFHIC 1.1 

FÜR HÜEHE=B.1 TO Z STEPF SCHRITT 

CHAR 1,8,1,STR$CHÜEHE) 

LIRCLE 1.164, 194,58, HOEHE#SA 

IF L$="J" THEN CIFCLE 9,1689, 188,50. HOEHEKSO 
FOR 2=1 TO 190: NEAT Z 

NEXT HÜEHE 

GETKET E$ 

GERFPHIC 9,1 

RETURN 


REM ======UJNTERPRÖRRMM "SEGMENTE ” 
INPUT"BREITE DER WELLE «Z.E. 2453", BREITE 
GRAFHIC 1,1 
FÜR BOGEN=A TO 3280 STEF 46 

CHAR 1.8,8,5TR$CBOGEN? 

LIRCLE 1,BOGEN, 198, EREITE, ‚90,270 

FOR ZEIT=1 TO 200: NE#T ZEIT 


4 NEAT BÜGEN 


GETKEY E# 
GRAFHIC 8.1 


3 RETURN 


INPUT "TORTENBEEITE IN GRAD <Z.B. 192"; BREITE 
GEAFHIC 1,1 
FÜR GEAD=8 TO 366 5TEF BREITE 
CIRCLE 1.160, 1600, 10%, ,GRAO.GREAD+BREITE 
DRAU 1 TO 1Ed,100 | 
NEAT GERALD 
GETEET E$ 


A GEAFHIC 9,1 
3 FETURM 
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3.10.5.2 Text im Pixel-Bereich mit CHAR 


Betrachten wir das Unterprogramm "KREIS IM KREIS' von Programm 
CIRCLE-TESTI. Geben wir als Schrittweite -10 ein, erscheinen 
16 konzentrische Kreise mit jeweils um 10 kleinerem Radien. Am 
linken Bildschirmrand wird der gerade gezeichnete Radius aus- 
gegeben (vgl. Ausführungsbeispiel). Dazu verwenden wir die An- 
weisung CHAR. Mit dieser Anweisung haben wir die Möglichkeit, 
Text im Pixel-Bereich zu zeigen, um die Grafik zu beschriften. 


2040 CHAR 1,0,2,STR$ (RADIUS) 


Farbe (1=zeigen, O=löschen). 
Spaltennummer (0-319), an der 
der Text beginnen soll, 
Zeilennummer (0-199) für Text. 





Auszugebender Text (Datentyp 
STRING erforderlich). 


CHAR-Anweisung zur Textausgabe im Pixel-Bereich der Grafik 


Ausführung zu Unterprogramm 'KREIS IM KREIS' von CIRCLE-TESTI: 


Eingabe 
von 
SCHRITT=-10 


Text und 
Grafik im 
Pixel-Bereich 


Äusserer Kreis 
als 
erster Kreis 





Zum Unterprogramm 'HOEHE-BREITE' von CIRCLE-TESTI: 

Dieses Unterprogramm in den 3000er-Zeilen dient dazu, das Ver- 
hältnis des X-Radius (Breiten-Radius) zum Y-Radius (Höhen-Ra- 
dius) zu testen. Geben wir -1 als Seitenverhältnis SCHRITT ein 
(Zeile 3020), wird eine flache Ellipse gezeichnet. Die folgen- 
den Ellipsen werden immer höher. Dem Seitenverhältnis von 5/8 
bzw. 0.625 entspricht der Kreis (200 Zeilen zu 320 Spalten er- 
gibt 200/320 bzw. 5/8). Werte über 0.625 ergeben 'hohe' Ellip- 
sen. 
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3.10.5.3 Kreisausschnitte 


Das Unterprogramm 'SEGMENTE' in den 4000er-Zeilen von Programm 
CIRCLE-TEST1I dient dazu, Teilkreise zu zeichnen. Bei Eingabe 
von BREITE=20 erhalten wir folgende Wellenlinie: 


AAAAA AAN 


Im Unterprogramm 'TORTEN' von Programm CIRCLE-TESTI verbinden 
wir Teilkreise mit dem Mittelpunkt, um Torten zu erhalten. Bei 
Eingabe von BREITE=10 erscheint am Bildschirm folgendes 'Rad': 
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3.10.6 Grafik und Farbe 

3.10.6.1 Farbe einstellen mit COLOR 

Durch die Anweisung COLOR (vgl. Abschnitt 2.3.2.4) wird die 
Farbe für den Hintergrund, den Vordergrund (Zeichen) und den 
Rand bzw. Rahmen des Bildschirmes eingestellt. Dazu stehen 16 
Farben mit jeweils 8 Helligkeitsstufen zur Verfügung. Mit der 
Anweisung 


COLOR 0,3,7 


Bereich: O=Hintergrund, 1=Vordergrund, 
2-3=Mehrfarben und 4=Rahmen des Bildschirms 


Farbe 1-16: 3=rote Farbe. 

Helligkeitsstufe 0-7: 7=hell, O=dunkel. 
wählen wir einen hell-roten Hintergrund. Da 7 als Standardwert 
gilt, bewirkt die Anweisung COLOR 0,3 dasselbe. 


Drei Farbbereiche 


Hintergrund: Vordergrund: Rahmen: 


COLOR 0,3,7 COLOR 1,10,1 COLOR 4,8,6 
3=rot, 7=hell 10=braun, 1=dunkel 8=gelb,6=hell 
(Standard 2=weiß) (Standard 1=schwarz) (Standard 15=blau) 


Drei Beispiele zur COLOR-Anweisung 


Das Programm COLOR-TESTI demonstriert die Farben von Hinter- 
grund, Vordergrund und Rahmen. 


Codierung zu Programm COLOR-TEST]I: 


lga REM ======PRÖGEAMM COLOR-TESTI 
118 SCNCLR 

128 COLOR 8.2.7: COLOR 4.9.7 

132 FREINT "FARBTEST ZEICHEN: ":FRIMT 
144 LET BEFEICH=1 

128 GOSUE 1ac 

162 SCHNELLE 

178 FEINT "FARETEST HINTERGRUND: ":FRINT 
sa COLOR 1,1,7 

LET EEREICH=R 

GOSLE 1966 

SCHELR 

PRINT "FARBTEST ERHMEH:": FRIMT 
LOLRE 0.2.7 

LET BEREICH=4 

GÜSUE 1299 

EOLOR 4.3.7 

FEINT "ENDE." : END 


RE RE NE RE RE a 5 ER En Ze on 
IT OD BT Din üÜ 
SE SCH a U oe ET BE a a a Eu 
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Codierung zu Programm COLOR-TESTI (Fortsetzung): 


1209 REM ###UPFRO FARBEN 
1818 FOR HELL=3 TO 7 

19828 PRINT "HELLIGKEITSSTUFE" HELL 
1959 FOR FARBE=1 TO 15 

1949 COLOR BEREICH, FARBE. HELL 


1952 RERD F$: FRINT F$;" "; 
IN6O IF BEREICH=1 THEN 1956 
1678 FOR I=1 TO 4a8 :NEKXT I 


1052  NEAT FARBE 

1838 PRINT: RESTORE 

llaa PRINT "TASTE": GETKET Ef 

1115 NE#T HELL 

28 DATA SCHWARZ, WEISS, ROT, ZTAN, PURFUR 

39 DATA GRUEN, BLAU. GELB, ORANGE, BRAUN 

48 DATA GELEGRLUEN. ROSA, BLAUGRUEN. HELLBLAU 
„g DATA DUNKELBLAU. HELLGRUEN 

69 FETURH 


pet jeb jh jeb he 
pi ji je eb heb 


3.10.6.2 Flächen füllen mit PAINT 


Soll nicht nur die Begrenzung einer Fläche eingefärbt werden, 
sondern auch die Fläche selbst, so kommt die PAINT-Anweisung 
zur Anwendung. Das Programm PAINT-TESTI zeigt hierzu mehrere 
Beispiele. So wird mit den Anweisungen 


1050 CIRCLE 1,160,80,60 
1060 PAINT 1,160,80 


ein Kreis mit Radius 60 sowie Mittelpunkt (160,80) gezeichnet 
und eingefärbt. Die PAINT-Anweisung füllt das Kreisinnere vom 
Startpunkt (160,80) ausgehend bis zur Kreislinie mit Farbe. 
Anstelle von (160,80) hätte man auch einen anderen im Kreis- 
inneren liegenden Punkt nehmen können wie z.B. (173,77). Mit 


1050 CIRCLE 1,160,80,60 
1051 PAINT 1,20,20 


wird die außerhalb des Kreises liegende Fläche eingefärbt, da 
der Startpunkt (20,20) ni ch t im Kreisinneren liegt. 


Zum Unterprogramm 'VIELECKE' des Programms PAINT-TESTI in den 
1000er-Zeilen: 

In diesem Ablauf werden Vielecke, die mit der CIRCLE-Anweisung 
gezeichnet werden, eingefärbt. Dazu folgende Anwendungsfälle: 


MittelpunktsWINKEL: Eingefärbte Figur: 
90 Grad Quadrat 
60 Grad Regelmäßiges Sechseck 
120 Grad Regelmäßiges Dreieck 
80 Grad Unregelmäßiges Fünfeck 
180 Grad Senkrechte Linie 


über 180 Grad Keine Fläche (Fehler) 
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Zum Unterprogramm 'DREHEN' des Programms PAINT-TESTI in den 
2000er-Zeilen: 

Mit den Anweisungen 2120 COLOR 1,3: PAINT 1,0,0 färben wir 
das Feld, das außerhalb des mit CIRCLE gezeichneten Vieleckes 
liegt, rot ein. Bei diesem Feld handelt es sich um den Pixel- 
Bereich; der Text-Bereich behält seine bisherige Farbe. Geben 
wir die Anweisungen 2120 COLOR 0,3: PAINT 0,0,0 ein, so wird 
nur der 5-zeilige Text-Bereich rot eingefärbt. 

Zum Ablauf des Unterprogrammes: Geben wir die Werte MITTEL=-140 
und DREH=30 ein, wird ein Dreieck gezeichnet, das dann bei je- 
dem Tastendruck (2090 GETKEY E$) um 30 Grad weitergedreht wird 
(die Drehwinkel 30,60,90,.. erscheinen unten im Text-Bereich). 
Die Drehung erfolgt im Uhrzeigersinn um den Drehpunkt 
(160,80). 

Für LOESCH<>0 wird jeweils nur das letzte Dreieck gezeigt, für 
LOESCH=0 dagegen werden die gedrehten Figuren überschrieben; 
dadurch entsteht ein Gebilde ähnlich einer "Rosette'. 


Zum Unterprogramm "'PROZENTFLAECHE' des Programms PAINT-TESTI 
in den 3000er-Zeilen: 

Wie die beiden folgenden Ausführungsbeispiele (75 % und 25 $) 
zeigen, färben wir Flächen ein, die Prozentanteile veranschau- 
lichen. Die Kreisausschnitte werden mit CIRCLE (Kreislinie) 
und DRAW (Grenzlinien zum Mittelpunkt) gezeichnet. 


175% 25% 








Codierung zu Programm PAINT-TESTI: 


1a20 REM ======FRÖGEAMM FPAINT-TESTI 

118 FEINT "FLRECHEN EINFRERBEHM MIT FAINT-AHMEISUNG.": FRIMT 
1za Do 

138 FRINT "a ENDE DER DEMÄNSTERATION" 
142g FRINT "1 WIELECK EINFAERBEH" 

138 FRINT "Z WIELECK DREHEN" 

168 FRINT "3 FLRAECHE MIT FROZEHTAHTEIL" 
ira INFUT "WAHL E=-3";E#: LET E=VRALIE$) 
158 SCHELR 

134 OHM E GÜSUB 18898, 2008, Sad 

zuaa IF E=B THEN EXIT 

218 LOOP 

2 FRIHT "ENDE." :END 
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Codierung zu Programm PAINT-TESTI (Fortsetzung): 


1998 
1018 


REM ======JNTERROGRAMM "VIELECKE” 
GRAPHIG 2.1 
INPUT "MITTELPLUNKTSWINKEL (-1=ENDE}" WINKEL 
DO WHILE WINKEL>G 
SCNELR 
CIRCLE 1,160,88,68,,,.,WINKEL 
PAINT 1,168,598 
INPUT "MITTELPUNKTSWINKEL ©-1=ENDE}" WINKEL 
LÜOP 
GRAPHIC 9,1 
RETURN 


REM =====UNTERPROGRAMM “DREHEN” 
GEAPHIL 2,1 
INPUT "MITTELFUNKTSWINKEL (Z.E. 1493",MITTEL 
INPUT "DREHUNG IN GRAD (2.B. 383", DREH 
INPUT "ALTE FIGUR LOESCHEN SO=NEIN, 1=JA)";LOESCH 
FOR WINKEL=8 TO 368 STEP DREH 
IF LOESCH THEN SCHCLR 
CIRCLE 1,1689.859.68,,,.WINKEL,MITTEL 
PRINT "DREHWINKEL: "WINKEL 
GETKEY E$ 
NEAT WINKEL 


A PRINT "FELD AUSSERRHALB FRERBEN." 


COLOR 1,3: PRINT 1,9,8: COLOR 1.1 
FEINT"WEITER?";: GETKET E# 


GRAFHIC 8,1 
RETURN 
REM ======UJNTERFROGRAMM “FRÜZENTFLAECHE “ 


INPUT "WIEWIEL PROZENT (Z.B. 75>";PROZ 
INPUT "FARBE (Z.B. 1=SCHWARZ, 1O=BRAUND" ;FARB 
LET GRAD=SPROEX360,’100 

GEAFHIC 1,1 

REM ###&TORTE ZEICHNENFRRERERHTETRER 
CIRCLE 1,169. 100.84,.,8,6FAD 

DRAU 1 TO 166.188 

DRUM 1 TO 160,268 

REM *##FLRECHE EINFRERBENKERRRRRFENK 
COLOR 1,FRARB: FRAINT 1,162.28 

FEM ###PROZENTAHGABE ZEIGENFMERFFFHE 


3 CHAR 1.28, 1,5TR$CFROZI4+" 4" 


GETKET E$ 
GRAFHIE M,1: COLOR 1,1 
FETIRN 


3.10 Grafik 285 
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3.10.7 Zwei Anwendungen 


3. 


10.7.1 Tortendiagramm in Hires-Grafik 


Das Programm TORTENDIAGRAMM1 stellt für eine beliebige Anzahl 
von Artikeln (ANZ) die Absatzmengen M1I() und die Namen NAM$() 
grafisch dar. Dabei wird wie folgt vorgegangen: 


Die relativen Mengenanteile werden im Array M2() gespeichert 
(Zeile 310). 

Mit 350 LET B1=0 wird der Anfang der ersten Torte auf die 
'12-Uhr-Position' festgelegt. 

Die Zählerschleife 360 FOR - 490 NEXT steuert das Zeichnen 
der ANZ Torten des Diagrammes. 

Die Kreislinie jeder Torte wird in zwei. Etappen gezeichnet 
(zweimal CIRCLE), um dazwischen mit CHAR die Beschriftung 
einzufügen. 

Die Anweisung 410 LET X=RDOT(0) legt die aktuelle Cursor- 
position in X ab: X und Y werden in CHAR gebraucht. 

Mit 480 LET Bi=B3 wird der Anfang der (im Uhrzeigersinn 
rechts liegenden) nächsten Torte festgelegt. 


Ausführung zu Programm TORTENDIAGRAMMI1: 


ANZAHL DER ARTIKEL? 4 /RET/ 


1. 


2. 


3. 


4. 


ARTIKEL: NAME, ANZAHL? HAMMER,20 /RET/ 
ARTIKEL: NAME, ANZAHL? METERMASS,7 /RET/ 
ARTIKEL: NAME, ANZAHL? WASSERWAAGE,15 /RET/ 
ARTIKEL: NAME, ANZAHL? BOHRER,12 /RET/ 


BOHRER 12 


HAMMER 20 


WASSERWAAGE 15 





METERMASS 7 
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Codierung zu Programm TORTENDIAGRAMM] 


190 REM ======FRÜGRAMM TORTENDIAGRAMM 

112 PRINT "TTORTENDIAGEAMM MIT YVARIABLER ANZAHL" 
128 PEINT "ERSTELLEN UND BESCHRIFTEN. "PRINT 

138 : 

148 REM ======VEREINBARUNGSTEIL 

150 REM NAME, ANZ: ANZAHL UND NAMEN YON ARTIKELN 
168 REM MiC3.MExH: MENGEH ASOLUT UHD RELATIW 

ira INPUT "ANZAHL DER ARTIKEL" ANZ 

188 DIM NAM&CANZ>, MLCAHZS MZCANZD 


1328 REM BÖGEN: LRENGE IN GRAD EINES TORTENBOGENS 
200 REM B1l,B2,B3: EOGEHANFANG, -MITTE UND -ENDE 

218 REM »,': KOORDONATEN ZEILE, SPALTE 

220: 

230 REM ======ANWEISUNGSTEIL 


249 FÜR Z=1 TO AHZ 

230 FRINT Z;". ARTIKEL: NAME, ANZAHL": 
260 INFUT NAM$CZ3,MICZ> 

era LET MICA,=MICHD+MLCZY 

30 HEH&T Z 


sag FÜR Z=i TO ANZ 
sia LET MECZ>=MLLZ3M1CH) 
3ed NEAT Z 


gen: 

>48 GEAFHIC 1.1 : REM HÖCHAUFL. GEAFIK 
35a LET Eil=8 : REM TORTENAHFANG ÜBEN 
368 FÜR Z=1 TO AHZ 

Sa LET BÜGEN=MECZIESISH 

352 LET BZ=Bi+BüGEN’z 

335 LET B3=B2+EÜOGEN.zZ 

400 KCIFELE 1,160, 100,560, .Bl.Bz 

418 LET #=EDOTC5) : REM CURSORPOSITIOH 
42a LET T=RIOTE1} 

430 LET #=INTC##237200 

442 LET T=INTir#4E 3) 

+% CHAR 1,4. 1, NAMSCEH+STRECHLCZHD 
469  CIRCLE 1,1689,1899,30,,B2,B3 

4a DEAU 1 TO 1656, 1600 


420 LET Bl=E3 : FEM HEUER TORTENAHFRANG 
+30 HEHT £ 

ua GETEET E% 

2 GEAFHIC 8,1 :REM TE#T-MODUS 

eEH PRINT "ENDE. "EHI 
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3.10.7.2 Texte in Mehrfarben-Grafik 


Das Programm TEXTFARBZUFALLI verwendet die Mehrfarben-Grafik 
mit geteiltem Bildschirm. Dieser Grafik-Modus 4 wird mittels 


120 GRAPHIC 4,1 
eingestellt und kann mehrere Farben darstellen. Dabei 


werden Bildpunkte mit doppelter Breite ausgegeben, wodurch die 
Anzahl der Spalten von 320 auf 160 halbiert wird. 


Grafik-Modus: Spalten nebeneinander: Zeilen untereinander: 

biyeit-Grafik 0-39 (Textzeichen) 0-24 (Text) 

1 Hires-Grafik 0-319 (Pixel) 0-199 (Pixel) 

2 Hires + Text 0-319 (Pixel) 0-159 (Pixel) 
0-39 (Text) 0-4 (Text) 

3 Mehrfarben 0-159 (Breit-Pixel) 0-199 (Pixel) 

4 Mehrfarb + Text 0-159 (Pixel) 00-159 (Pixel) 
0-39 (Zeichen) 0-4 (Text) 


Bildschirmaufteilung bei den fünf Grafik-Modi 


Zum Ablauf von Programm TEXTFARBZUFALL]I: 

- Im Unterprogramm mit den 1000er-Zeilen sind 15 Worte gespei- 
chert, die in den Array DAT$() eingelesen werden. Diese 15 
Worte werden zufällig ausgewählt und am Bildschirm gezeigt. 


- Das Unterprogramm in den 2000er-Zeilen nimmt das Erzeugen 
der Zufallswerte vor: ZE und SP für die Anfangskoordinaten 
des Wortes, ARTIKELNR für die Nummer des Wortes und RAHMEN 
für die Rahmenfarbe. Die jeweilige Wortfarbe wird in Zeile 
260 zufällig erzeugt. 


- Das Unterprogramm in den 3000er-Zeilen schreibt zwei Text- 
zeilen in den Text-Bereich unten am Bildschirm. Dieser Text 
bleibt dauernd stehen - im Gegensatz zur Ausgabe im oberen 
Pixel-Bereich. 


- In der Zählerschleife 240 FOR I - 320 NEXT I wird ein Wort 
dreimal in einer jeweils anderen Farbe zur Anzeige gebracht. 
Jede Farbe wird in den 8 Helligkeitsstufen 'zum Aufleuchten' 
gebracht. 


Das Programm kann sehr einfach angepaßt werden. Dazu folgendes 
Beispiel: In der 3000er-Zeilen die Firmenbezeichnung eintragen 
(maximal 5 Zeilen für den Text-Bereich). In den 1000er-Zeilen 
die Artikel des Sortimentes eintragen (1. Wert in DATA für die 
Anzahl). Das Gerät z.B. ins Schaufenster stellen und das Pro- 
gramm starten. 
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a EL! Codierung zu Programm 
08 a: XTE SEN 
GRAPHIC 4,1 : REM MEHRFARBEN+TEXT TEXTFARBZUFALL! 
COLOR 9,1  : REM HINTERGRUND SCHMARZ 
COLOR 3,1  : REM MEHRFARBEN SCHWARZ 
LET Z=RNDC-TI>: REM QUELLE ZUFALL 
TRAP 339 
REM %KENDLOSSCHLEIFE AUSGANG TRAP# 
10 
GOSUB 2088 : REM NAECHSTER TEXT 
7=2000:G0SUB 4000 
GOSUB 3008 : REM TEXTBEREICH UNTEN 
7=1500:G0SUB 4208 
CHAR 3, ZE SP, DAT$CARTIKELNR) 
FOR I=1 T0 3 
COLOR 3,1 
LET FARBE=INTCRNDELDELSI+Z 
FOR HELL=@ TO 7? 
COLOR 3, FARBE HELL 
7=190:605UB 4000 
NEXT HELL 
Z=593:G05UB 4000 
NEXT I 
7=1900:G0SUB 4000 
COLOR 3,1 
7=1200:G0SUB 4000 
SCHCLR: COLOR 4, RAHMEN 


3ra LOOP 

358 GEAPHIC 8: COLOUR 1,1.7 : COLOR 9,2 

338 COLOR 4,14: END 

em : 

410 : 

1088 REM ###DATEN EINLESENFRRRRTRREREREN 

1818 DATA 15, DATEI, MUSIK, SCHLEIFE, FRÖGRAMSTRUKTUR, DEAUW 
1820 DATA FIRMMARE, FENSTER, CHIP, HARDWARE, AREA'T 

1039 DATA TEAT,MEHUETECHNIE,8-BIT-MIKRÜO, SPIEL. DATENTTFEN 
1048 RERD N: DIM DATSCH? 

1959 FOR I=1 TO N: RERAD DATF<CI>: NERT I 

1869 RETURN 

1070: 

1950 : 

2058 REM ###TEATFÜSITION/RAFTIKEL ZUFALL# 


LET ZE=INT{RNDS12#12. 

LET SP=INTERHNDE12KZ20) 

LET ARTIKELHR=INTCRNDEIS>#MD +1 
LET RAHMEN=INTIRNDEIDHIE>+I 
FETIFH 


REM ###*TEATEEREICH UNTEN 

COLOR 1,2 

FEINT "BASIC-WEGWEISER FUER C-16, C-1ls. PLUS4" 
FEINT "VIEWEG VERLAG WIESERDEN " 

RETURN 


4aad REM KKHZEIT-/URARTESCHLEIFERRRERFEF EN 


FOR T=1 TO Z: NEAT T 


4023 RETURN 
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3.11 Musik 


3.11.1 Erzeugen von Tönen mit SOUND 


Zum Erzeugen von Tönen und Geräuschen stellt BASIC die Anwei- 
sung SOUND zur Verfügung. Wie die Grafikanweisungen kann auch 
diese Musikanweisung im Direkt- oder Programm-Modus eingegeben 
werden. Geben wir die Anweisung SOUND 1,345,25 ein, ertönt 
die Note "tiefes E' ungefähr 1/2 Sekunde lang (Abbildung). 


SOUND 1, 345, 25 


imme-}f#: 

Tongenerator 1 ergeugt Töne. 
Tongenerator 2 erzeugt Töne (wie 1). 
Tongenerator 2 erzeugt Geräusche. 


ww rd elf 
nn cr 


Notenwert: 
Werte 00-1023 (Wert 345 = Frequenz 164.7). 
Formel Wert=1024-(111840.45/Frequenz). 


5 pi e Ld au er, 

Dauer 0-65535 (mal 1/50 Sek.). 

Dauer 50=1 Sek., Dauer 25=1/2 Sek. und 
Dauer 0=-Ton abschalten. 


Anweisung SOUND an einem Beispiel 


Stellt man die SOUND-Anweisung in eine Zählerschleife, lassen 
sich die verschiedenen Effekte erzielen. 


3.11.2 Tonerzeugung an Beispielen 


Das Programm SOUND-TESTI bietet über ein Menü vier Unterpro- 
gramme zum Testen der Anweisung SOUND an. Im ersten Unterpro- 
gramm 'TASTATUR' werden die Klaviertasten C,D,E,F,G,A und H 
auf der Commodore-Tastatur simuliert: Drücken wir z.B. die 
Taste '"C", so ertönt das 'tiefe C' in der gewünschten Dauer. 
Lassen wir die Taste gedrückt, ertönt das "tiefe C' scheinbar 
andauernd (nur scheinbar, da im DAUER-Takt kaum hörbare Lücken 
auftreten). 

In den Zeilen 1080-1140 werden der Variablen W die zugehörigen 
Notenwerte zugewiesen, die dann mit der Anweisung 


1160 SOUND GEN,W,DAUER 
angespielt werden. Wählen wir mit GEN=3 die Stimme 3, so wird 


der zweite im Commodore eingebaute Tongenerator aktiviert, um 
anstelle von Tönen Geräusche auszugeben. 
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188 REM ======PROGRAMM SOUND-TESTI 

118 PRINT "TTEST DER ANWEISUNG SOUND: " 

126 DU 

138 FRINT "8 ENDE" 

140 FRINT "1 C.D.E,F,G,A,H TASTATUR" 

158 FRINT "2 EINGABE VON FREQUENZEN" 

168 PRINT "3 TON-BEREICHE MIT SOUND" 

174 FRINT "4 LEBENSUHR" 

158 INPUT "WAHL 9-4"; W$: LET W=V/ALCHF) 

190 IF U=5 THEN EXIT 

2a ON WU GOSLUB 1900. 2090, 36808, 4800 

218 PRINT "TASTE": GETKEY WE: SCNELR 

228 LOOF 

230 PRINT "ENDE." : END 

2409 : 

258 : 

1895 REM 3&4UHNTERPRÜGRAMM TASTATUR BR 
18318 PEINT "TEINGABE: NOTEN C,D,E,F,G:A,H ODER B=EHDE" 
1029 vOL 8 

1538 INPUT "STIMME 1. Z ODER 3":GEN 

1848 INPUT "TONDAUER 125=172 5EK>}"; DAUER 

1859 DU WHILE E#C>"O" 

1960 GETKEYT E$: FRINT E#; 

1874 IF E$="68" THEN 1170 

1030 IF E£="C" THEN LET W=163: GOTO 1169 

1930 IF E£="D" THEN LET W=2862: GOTO 11659 

1109 IF E$="E" THEN LET W=345: GOTO 1160 

1119 IF Es="F" THEN LET WU=383: GOTO 1168 

1120 IF E$="G" THEN LET W=453: GOTO 1160 

1138 IF E$="A" THEN LET WU=516: GOTO 1160 

1148 IF E$="H" THEN LET W=571: GOTO 1168 | 
1138 FRINHT:PREINT "C.D.E,F.G,R,H ODER O=EHDE": GOTO 1178 
1168 SOUND GEN, bi, DAUER 

11ra LOOP 

1158 RETUFN 

1129 : 

1200 : 

zuRB3 REM ##*UNTERFRÜGREAMM "FREQUENZEN BE 
zuila INPUT "TEINGABE: FREÜUUENZ AB 118 CO=ENDE>";FRO 
za2a DO WHILE FRÜ<CHB 

230 LET WERT=1924-r 1119344. 45, ’FRQ> 

2048 PRINT "= NOTEHWERT"; WERT 

25 SOUHNI 1,WERT,S8 

2068 INFUT "FREQUENZ <O=ENDE>";FREÜ 

2878 LOÖP 

zu52 RETURN 

2za3g : 

2199 : 

3389 REM #&#UNTERFROGRAMM “TOHN-BEREICH HERR 
3318 INPUT "TON-BEREICH <18-1915:"; BER 

5926 IMFUT "HNÖTENWERTE ZEIGEN “O=HNEIN>";SE 

sa3a FÜR Zei TO 2 

3044 FÜR HÖEHE=EBER Tü -BER 5STEF -18 

3838 LET WERT=BEER-AES it. HÜOEHE 

Zus SOUND 1.WERT:3 

3078 IF E THEN FRIHT WERT: 

sa2d NEXT HÜEHE 

3299 NEXT Z :FRINT 


3129 


RETUFN 
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Codierung zu Programm SOUND-TESTI (Fortsetzung): 


4808 REM KKHUNTERFROGRAMM "LEBEHSUHR RER 
4818 PRINT "DIE UHR: " 

4820 LET T$="ICH WERDE IMMER AHELTER „.." 

4833 FOR TAKT = 1 TO 26 

4048 PRINT MIDELT$,TAKT.1>: 

4453 SOUND 1,118,8: SOUND 1,7,0 

4468 FÜR ZEIT=1 TO 690: NEXT ZEIT 

4074 NEAT TAKT 

4258 PRINT: RETURH 


Zum Unterprogramm 'FREQUENZEN' in den 2000er-Zeilen von Pro- 
gramm SOUND-TESTI: 

Innerhalb einer WHILE-Schleife geben wir Frequenzhöhen in FRQ 
vor, die dann nach der Formel 


2030 LET WERT=1024-(111840.45/FRQ) 


in NotenWERTe umgerechnet werden. Die Anweisung SOUND verlangt 
solche Notenwerte. Töne in Höhen über dem 'hohen G' (Frequenz 
1575 gleich Notenwert 953) sind nicht mehr wahrnehmbar. 


Zum Unterprogramm 'TON-BEREICH' in den 3000er-Zeilen von Pro- 
gramm SOUND-TEST]: 

Hier wird die SOUND-Anweisung in eine Zählerschleife plaziert, 
um ein An- und Abschwellen von Tönen zu erzielen. Geben wir 
für BER=1015 ein, erhalten wir z.B. folgende Klangkurve: 


Notenwert: 1015 1015 


Notenwert: 15 15 15 


Die äußere Schleife 3030 FOR Z=1 TO 2 erzeugt zwei 'Weilen' 
im Notenwertbereich 15 - 1015 - 15. 


Zum Unterprogramm 'LEBENSUHR' in den 4000er-Zeilen von Pro- 
gramm SOUND-TEST]: 

Dieser Ablauf zeigt, wie die Ausgabe von TEXT und 'Musik' ge- 
koppelt werden kann: Bei Erscheinen des nächsten Buchstabens 
wird ein Takt-Ton ausgegeben. Die Anweisung SOUND 1,7,0 mit 
der Spieldauer 0 sorgt für ein abruptes Beenden der Tonausga- 
be. Dieses kleine Programm ist natürlich ironisch gemeint und 
leicht änderbar. Soll der Text "ICH WERDE IMMER AELTER ..." 
z.B. durch "ICH BLEIBE IMMER JUNG ..." ersetzt werden, so ist 
der Endwert 26 durch 25 auszutauschen. 
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3.11.3 Ein Lied abspeichern und spielen 


Um ein Lied zu spielen, muß eine Folge von Noten im RAM abge- 
speichert vorliegen. Man kann diese Noten z.B. programmintern 
in DATA-Zeilen oder in Notenstrings abspeichern. Am Beispiel 
des Liedes "Der Mond ist aufgegangen" werden wir diese beiden 
Speicherungsarten darstellen. 


Speicherung von Noten 


DATA-Zeilen Notenstrings 


m Hmm m Am HE A sie a EEE Kä = = = = = 2 = EEE a Te 


DATA CH TIDIITE,T,E TI ,Er TG DD, 27; 1 LET M1$="C1DICIF1IE1ID2C1" 
(Der Mond ist auf-ge-gangen) 


Noten in DATA-Zeilen oder in Notenstrings speichern 


3.11.3.1 Noten in DATA-Zeilen abspeichern 


Zum Unterprogramm 'NOTEN' von Programm MUSIKSTUECK]: 

Das Programm MUSIKSTUECK1 speichert die Noten des Liedes "Der 
Mond ist aufgegangen" in den DATA-Zeilen 2080-2150 ab. Dabei 
gelten folgende Vereinbarungen: 


- C,D,E,G,F,A,H für die Notenhöhen C-H. 

- Die Zahl hinter den Noten C-H gibt die Dauer an: 1 für 1/4- 
Note, 2 für 1/2-Note, 4 für ganze Note usw. 

- 0 für Oktave gibt die von diesem Zeitpunkt an geltende Okta- 
ve. "0,1" steht für "Oktave 1" mit den Notenwerten 169-571. 
Es sind drei Oktaven vorgesehen (1000er-Zeilen). 

- X für Ende singalisiert das Liedende. 


In der Zählerschleife 2020-2070 werden diese Daten in den No- 
ten-Array N$() und den Dauer-Array DAUER() eingelesen. 


Zum Unterprogramm 'NOTENWERTE' von Programm MUSIKSTUECK]: 

In die Matrix WERT(,) werden die Notenwerte der drei unteren 
Oktaven eingelesen. Diese Matrix kann leicht um weitere Okta- 
ven sowie Halbtonschritte ergänzt werden. 


zum Spielen des Liedes in vier Schritten (100er-Zeilen): 

- Zunächst geben wir die Dauer TDAUER und die Lautstärke LAUT 
vor. 

- Dann werden die Notenwerte nach WERT eingelesen. 

- In Schritt 3 werden die Noten des Liedes in den Noten-Array 
N$() eingelesen. 

- In Schritt 4 wird das Lied über eine Zählerschleife gespielt 
(Zeilen 370-430). 


3.11 Musik 293 
Codierung zu Programm MUSIKSTUECK]: 


180 REM ======PROGRAMM MUSIKSTUECKI 
1198 PRINT "LIED SPIELEN <METHODE “NOTEN IN DATA’>.": PRINT 


138 REM ======VEREINBARUNGSTEIL 


148 REM N$C>: NOTEN C,D,... <MAX 50) 
158 REM Ni: STELLE DER NOTE IN OKTAVE (Y.B, D=2) 


160 REM N2: NOTENWERT (Z.B. D=2=262) 

178 REM DAUERS>: DAUER (1=1.’4-NOTE, 2=1/2-NOTE .„..? 

189 REM DI: DAUER TATSRECHLICH 

1368 REM TDAUER FAKTOR FUER TONDAUER 

208 REM ANZ ANZAHL DER LIED-NOTEN 

218 REM OKTAVYE OKTAYE 1,2 ODER 3 IN WERT 

228 REM LAUT LAUTSTRERKE FUER YOL 

230 REM WERT“,>: NOTENWERTE YON 3 OKTAVEN £3 ZEILEN, 7 SPALTEN? 


250 REM ======ANWEISUNGSTEIL 

260 PRINT "1. ABSPIEL-MODUS FESTLEGEN" 
era INPUT"TONDAUER ©1-5%5 "; TDAUER 
238 INPUT "LAUTSTAERKE 0-33"; LAUT 
238 PRINT "2. NOTENWERTE „."; 

3aR GOSUB 1989 

318 PRINT ".. EINGELESEN" 

328 PRINT "3. NOTEN-AREAY FÜER LIED „." 
320 GOSUB 2088 

348 PRINT ".. EINGELESEN" 

358 YOL LAUT 

360 PRINT "4. LIED SPIELEN MIT TON: " 
378 FÜR I=1 TO ANZ 

358 LET NI=INSTRE"CDEFGAH" .NFCI>) 
338 LET NZ=WERTCOKTAVE,NI} 

400 LET DI=TOAUER#DAUERCT 

44a SÖUUND 1,N2,D1 

420 PRINT N$Ll»," ": 

430 NEAT I 

448 FRINT: FRIHT "ENDE." 'END 


1899 REM KERLINTERPRÜGRAMM “NOTEHHERTE ERFHHRFEFEREFTEN N 
1818 FEM MOTENWERTE YOH 3 OKTAWEN 
inzo DATA 169, 268, 345, 353, 4593, 516,571 
18389 DATA 5396, 643,635, 704, 739,770, 739 
140 DATA 518, 334, 854, 565. 851,597, 911 
1458 DIM WERTE3, 7 

163 FOR I=1 TO 5 

ia7a FOR J=1 TO 7? 

1954 RERD WMERTCI. TO 

1520  MEST I 

11940 NEAT I 

1119 RETURN 
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Codierung zu Programm MUSIKSTUECKI 


2040 
2018 
2020 
20308 
2048 
2058 
RED 
zur’ 
2050 
26090 
2lo4 
2118 
2128 
2138 
2144 
2158 
led 
2lra 


2190 


311232 
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(Fortsetzung): 


“NOTEH REIKI 
: REM MAX 58 NOTEN VORGESEHEN 


REM #%#&UNTERPROGRAMM 
nIM N$<C50>, DAUER 59} 
FOR I=1 TO 59 

RERD N$<CI>: RERD DAUER<TD 

IF N$CI)="#" THEN LET ANZ=I-1: 
IF N$U1I>2>"0" THEN 2870 

LET OKTAVE=DAUERCI2:GOTO 2038 
NEAT 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA #, 
REM O=DKTAVYE, % 
REM C,I,E,F,G,A 
RETURH 


GOTI 2190 


b0 3 


.. u 
5 u 3 5 


. 
= 


m m 1“ nu 
n 


nnommeo 
m m pi 
mmommo 
ei 


% 


.mnmommoo.- 
bi db eb ei eb pub je ja 


Noten in Notenstrings abspeichern 


Das Programm MUSIKSTUECK2 spielt ebenfalls das Lied "Der Mond 


ist aufgegangen", verwendet aber 
Speicherung der Liednoten 
Es werden 
ersten beiden 


Notenstrings _ zur 
(Unterprogramm mit 2000er-Zeilen). 
fünf Teilnotenstrings M1$-M4$ gebildet, wobei die 
zweimal angespielt werden (siehe Abbildung). 


Fünf Teilnotenstrings M1$-M4$: 


ME mE EEE mE mE HE mE mn he ee u  — ——— — —  ——— 


MO$="01" 


Der Mond ist aufgegangen, 

die goldnen Sternlein prangen, 

am Himmel hell und klar. 

Der Wald steht schwarz und schweiget, 
und aus den Wiesen steiget, 

der weiße Nebel wunderbar. 


Ein Gesamtnotenstring M$: 


M1$="CIDICIFIEID2CI" 
M2$="EIEIE1IAIGIF2ET" 
M3$="EIEIEIFIEID3" 

M1$ 

M2$ 
M4$="EIEIEIFIEIDIDICIK" 


2060 LET M$=MO$+M1 $+M2$+M3$+M1 $+M2$+M4$ 


X=Ende, 1=Viertel-Note, 


Ol=1. Oktave (von 3). 


2=Halbe Note, 3=Dreiviertel-Note, 


Speicherung der Noten eines Liedes in Strings 


Mit der Stringaddition in Zeile 2060 von Programm MUSIKSTUECK!I 
verknüpfen wir die sieben Teilnotenstrings zu einem Gesamtno- 
tenstring M$. Dieser String wird dann beim Spielen des Liedes 
Zeichen für Zeichen mittels MID$(M$,I,1) abgearbeitet. 
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Codierung zu Programm MUSIKSTUECK2: 


100 
119 
124 
130 
146 
150 
160 
17 
198 
13% 
2a 
218 


220 


REM 


PRINT 


REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 


"LIED SPIELEN METHODE PRINT 
======V/EREINBARLNGSTEIL 

NE: GESAMTNOTENSTRING 

Nas. M4$: TEILNDTENSTRINGS 

Hi: STELLE DER NOTE IN OKTRYE (Z.E. 
Ne: HMOTEHWERT (Z.B. I=2=262) 

Di: DAUER TATSAECHLICH 

TDALER FAKTOR FÜUER TONDAUER 

OKTAVYE OKTAYE 1,2 ODER 3 IN WERT 


?NOTENSTRING“.®: 


=2) 


REM 
REM 


238 : 


240 
290 
260 
er) 
2a 
29a 


19658 
are 
122 
1030 
1108 
1110 


REM 
PRIHT 
INPUT 
INPUT 
FRINT 
GOSUB 
PRIHT 
PRINT 
GÜUSLE 


LALIT 
WERTC,3: 
====ANWEISUNGSTEIL 


LAUTSTAEREE FUER VOL 


HOTEHMERTE "WON 3 OKTAVEN (3 ZEILEN, 7 SPALTEN? 


"1. ABSPIEL-MODUS FESTLEGEN" 
"TONDRUER 1-50) ", TOAUER 
"LAUTSTRERKE 0-83" ;LAUT 
"2. HOTENWERTE „."; 

1908 

"s. EINGELESEN" 

"3. HOTENSTRING FUER LIED 


re 


A PRINT MID$CH$, 1,15: 
3 NEXT I 
a PRINT: PRINT 


3 REM NÖTEHMERTE | 


DATA 153. 262, 345, 223,453: 216.971 
a DATA Sa, Ba TA ET "d. as 
A DATA 318,834, 854,855, 821,897, 911 


PRINT ".. EIHNGELESEN" 

“OL LAUT 

PRINT "4. LIED SPIELEN MIT TON: " 
FÜR I=1 TO 1968 STEP zZ 

IF MIDE«M$,T,1.2="=" THEN LET 1I=1963: 
IF MIDECH$. I, 13<2"0" THEN 4a 

LET OETAWESYALSMHIDSEME, I+1, 135: G0OTD 400 
LET NI=INSTRE"CDEFGAH",MIDECH$,T, 153 

LET NZ=WERTLOKTAVE,NID 


GOTÜ 450 


4 LET DI=STDRAUER#WALSMIDSCHF, I+1,15) 


SOLHD 1,H2,D1 


„ BB ° 
4 


"ENDE." :END 


REM #H#UNTERFRÜGERAMM “HÖTEHMERTE FREE ERTENE 


„OH 3 ÖOETRAVTEN 


a DIM WHERTES,TO 


FÜR I=1 TO 3 
FÜR J=1 TO 7 
READ MERTÜI.TO 
NEKT J 
HEXT I 
RETURH 
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Codierung zu Programm MUSIKSTUECK2 (Fortsetzung): 


2069 REM ###UNTERPROGRAMM "NOTEN ERFETERTTFIEEIEII 
2818 LET Mös="ül" 

26265 LET MiI$="CIDICIFIEIDZCI" 

2638 LET M2$="ElIEIEIRIGIFZEL" 

2848 LET M3$="EIELIEIFIEIDZ" 

26559 LET M4$="EIELIEIFIEIDILICIH" 

2068 LET M$=MBF+MIS+M2F+M3F+M 1 SHMZFHN4$ 

2078 REM O=ÜKTAYE, A=EHNDE 

2893 RETURM 
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Programmverzeichnis 


Das folgende Inhaltsverzeichnis zeigt die 87 im Wegweiser-Buch 
erläuterten BASIC-Programme. Die jeweils links neben dem Pro- 
grammnamen angegebene Nummer gibt die Anzahl der vom Programm 
belegten Blöcke an (ein Block entspricht 256 Bytes). Alle 87 
Programme belegen 294 Blöcke bzw. 75264 Bytes (ca. 75 KBytes). 


HERE TISCH IS 2 "FUELLSTRINGI" PRG 
2 "HELLO" PRO 1 "RUNDENZAHLL" PRG 
1 "WERBRALCHI" FRG 3 "KOMMERZZAHL1" PRG 
1 "PREISSENKUNGI " PRG 6 "DEMO-USINGL" PRG 
2 "FREISSENKUNGZ" FRG I "DRUCKER" FRG 
I "KALKULATIOHL" FRG 1 "CHR$-TESTL" PRG 
& "SKONTOZWEISEITI" PRO 1 "ASCII-TESTI" PRG 
£ "SKOHTOZUEISEITZ" PRO 2 "DEZIMALBINRERI"  PRG 
& "SKONTDEINSEITI"  PRG 2 "BINARERDEZIMAL1"  PRG 
2 "SKONTDEINSEIT2" PRO 6 "HEXDEZIMALL" PRG 
£ "DREIFRELLE1" PR; 4 "DEZIMALHEAL" PRG 
2 "DREIFRELLE2" FRG 2 "DEZIMALBINAER2" PRO 
3 "MWSTL" PRG 2 "DEZIMALBINRERS" PRO 
3 "KAPITRL10" PRG 3 "DEZIMALBINAER4" — PRG 
3 "KAPITALIL" PRG £ "PEEKLESENI" PRG 
3 "KAPITALZB" PRG 3 "POKESCHREIBENI"  PRG 
3 "KAPITALZ1" PRG 3 "LAGERREGAL1" PRI5 
4 "ZUFALL" FRG 3 "YOKABELDRILL1" FRG 
1 "BENCHMARK-TESTI" PRG I "ABSATZTABELLE1" PRO 
I "FAHRTENBUCHL" PRG 4 "SUCHBINRER1" PRG 
I "RATENSFARTABELLE" PRG 3 "SORTDATENA" PRG 
£ "DEMO-UPROL" FRG 3 "SORTZEIGER1" PR&G 
£ "DEMO-FUNKTIONI"  PRG 4 "SORTDATENZ" FRG 
> "MENUEL" PRG 4 "MISCHDATENI" PRG 
4 "STANDARD" PRG 3 "GRUPPDATENI” PR&G 
1 "BOOLEANI” FRG 2 "FEHLER-TERPL" PR& 
1 "EOOLERNE" FR 28  "SEGUENT-DATEIL" PRO 
& "BOOLEAN3" FRG 1 "TASTEHBELEGUNGI" FRG 
3 "ZEICHSTRINGSUCHL" PRG 12  "DIREKT-DATEIL" FRI 
4 "ZEICHSUCHL" PRG 2 "ZEIT-TESTI" PRG 
2 "STRINGSUCHI" PRG £ "MODULALT" PRG 
3 "TERTUMKEHREHL" PRG 1 "MODULNEN" PRG 
1 "ALSEIHANDERL" PRG 3 "WINDOU-TESTL" PR&G 
3 "BLANKSZEIGENI" PR& 2 "COLOR-TESTL" PRG 
& "RECHTSBUENDIG1"  PRG 3 "DRAU-TESTL" FRG 
2 "FUEHRENDENULL1"  PFRG 3 "LINIE-BEHEGI" FRI; 
1 "STRINGBLANKSL" PRG 4 "KURYEL" PRG 
1 "DATUMGANZZAHLI"  PRG 3 "EOr-TESTL" FRG 
4 "ETIEETTENI" PRG ei "CIRCLE-TESTI" FRG 
6 "JOKER" FRG 6 "FARINT-TESTL" FRG 
4 "WERSCHLUESSELUNG" FRG =) "TÖRTEHDIAGERMMI" PRG 
3 "WORTSPIELI" PR E "TESTFARBZUFALL1" PRG 
£ "CURSORFOSITIOHL" PRG 3 "MUSIESTÜUECEL" FR; 
& "DEMÖ-PRIMTL" PR r "SDUHND-TESTL" FR 


"MUSIKSTUECKE" FRI; 
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Sachwortverzeichnis 


Absolut-Positionierung 272 
ABS() 100 

Abweisende Schleife 133 
ADA 50 

Adresse 33 113 201 
Adreßbus 70 

Adreßfeld 13 
Adreßkomplement 196 
Adreßrechnung 38 263 
Ändern (Datei) 41 
Aktueller Parameter 149 
Algol 50 

Algorithmus 41 
Algorithmischer Entwurf 30 58 
Alternativstruktur 31 

ALU 7 

AND 156 191 

Anlegen (Datei) 41 257 
Anweisungsarten 35 97£ 
Anweisungsteil (Programm) 35 12 
Anwenderdiskette 91 
Anwenderprogramm 24 55£ 
APL 50 

Arbeitsspeicher 8 

Array 26 95 212f 253£ 
Array-Speicher 201f 

ASC() 100 158 169 
ASCII-Code 10 184 
ASCII-Display 207 
Assembler 48 50 200 

ATN() 100 

Auflösung (Grafik) 268 
Aufzählungstyp 28 
Ausführung (Programm) 117 
Ausgabegerät 5 

Auswählen (Datei) 41 
Auswahlstruktur 30 125£ 
AUTO 97 238 

Automat 8 45 


B (Byte) 12 77 

Back-Up 16 

BACKUP (Kommando) 103 
Balkencode 7 

Bandgerät 90 

BASIC 28 50 

BASIC 3.5 75 
BASIC-Maschine 46 
BASIC-Programmspeicher 112 201 
BASIC-Versionen 75 109 260 
Bedingte Verzweigung 127 
Befehlsbus 70 

Befehlskanal 111 
Befehlsstring 261 
Benchmark-Test 139 
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Benutzerdefinierter Datentyp 28 
Benutzerfunktion 149 
Benutzerspeicher 200 
Bereich 26 212£f 
Bereitschaftszeichen 77 
Betriebsart 88 
Betriebssystem 25 

Bewegen (Grafik) 273 
Bildschirm 172 
Bildschirmfenster 243 
Bildschirm-Rasterung 287 
Bildschirm (geteilt) 268 
Binärbaum-Sort 222 
Binärmuster 187 
Binärzeichen 9 186f 
Binäres Suchen 220 

Bit 9 

Bitparallele Aufzeichnung 12 
Bitposition 192 
Bitserielle Aufzeichnung 12 
Bitweise Verarbeitung 191£ 
Bit-Struktur 73 

Block 12 297 

Blockdiagramm 56f 

BOOLEAN 25 155 

Boolesche Variable 155£ 
BOX 105 276 

Bps 12 

Brainware 3 

Branchenlösung 66 

BTX-Netz 21 

Bubble Memory 6 

Bubble Sort 227 
Built-In-Software 115 199 
Bus 69 

Byte 10 


c 50 

CBM-Serie 4000/8000 112 
Centronics-Schnittstelle 15 
Chaining 242 

Char (Datentyp) 25 

CHAR (Anweisung) 105 279 
Character 36 

Chip 8 68 

CHR$() 100 158 

CIRCLE 105 277£ 
CLEAR-HOME 79 

CLOSE 103 179 251 

CLR 97 

CMD 103 179 
CMC-7-Schrift 7 

Cobol 50 

Codasyl 44 

Codierung (Programm) 55 117 
COLLECT 103 

COLOR 96 281 

COM 5 
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Commodore 76 
Commodore-Taste 82 
Commodore-64 113 
Compiler 48 211 

CONT 97 

COPY 103 

coS() 100 

CPU 2 7 
CP/M-Betriebssystem 52 53 
Cursor 79 
Cursorsteuerung 79 107 172 
DATA 97 151 

Datasette 90 

Datei 23 36f 246 
Dateiverarbeitung 244f 
Dateiverkettung 43 
Dateiverwaltungssystem 43 64 
Datei-Programmpaket 65 
Daten 2 22f£ 202£ 

Datenbank 36 43f 342 
Datenbank-Maschine 45 
Datenbus 69 

Datenerfassung 5 17£ 
Datenfeld 13 36 246 
Datenflußplan 56 226 
Datenmanager 64 
Datenredundanz 43 
Datensammelsystem 18 
Datensatz 36 246 
Datensatz-Beschreibung 256 
Datensatz-Zeiger 257 
Datensicherung 16 
Datenstrukturen 23f 95 
Datenträger 2 

Datentypen 23 25£ 
Datentypzeichen !,#,%,$ 95 212 
Datentyp 'boolean' 25 155 
Datenverkehr 42 245 253 263 
Datex-Netz 21 

Datum 165 

DCLOSE# 110 257 

DDL 43 

DEC() 100 

DEF FN 97 149£ 

Deklaration 34 

DELETE 97 241 

Dezentrale Erfassung 17 
Dezimal 186f 

Dialoggerät 5 
Dialogprotokoll 30 117 
Dienstprogramm 24 

DIM 96 97 212 

Digital Research 53 
DIRECTORY (Diskette) 47 93 103 
Direkte Adressierung 264 
Direktmodus 77 272 
Direktzugriff 37 
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Direktzugriff-Datei 40 256f 
Diskette 6 13 85 
Disketten-BASIC 75 
Divisions-Rest-Verfahren 266 
DLOAD 89 103 241 

DML 43 

Dokumentation 59 
Dollarzeichen (Hex) 196 
Dollarzeichen (Text) 212 
DOPEN# 256 
Doppelpunkt ;: 
DOS 24 53 
DO-LOOP-EXIT 137 

DO-LOOP-UNTIL 97 135 
DO-WHILE-LOOP 97 133 

DRAW 101 269 

Drehung (Grafik) 106 283 
Dreieckstausch 223 
Drillprogramm 214 

Druckbares Zeichen 173 

Drucken (Programm) 179 

Drucker 14 

Druckersteuerung 180 
Drucker-Spooling 21 

DS, DS$ 101 197 254 

DSAVE 88 104 

Dual-System 9 192 

DIPLICATE 110 

Dynamische Dimensionierung 214 


122 131 


EAN-Code 7 

EBCDI-Code 10 11 
Editor 24 

Eingabegerät 5 
Einseitige Auswahl 128 
EL 101 

ELAN 50 

Element (Array) 213£ 
Ellipse 277 

ELSE 7 126 

END 97 

Entwurfsprache 30 58 
EOF 42 

EPROM 73 

ER, ERR$ 101 237 

ESC (Fenstersteuerung) 243 
Ethernet 21 
EVA-Prinzip 8 119 
EXP() 101 
Exponentialdarstellung 78 
Externer Datenbus 70 
Externer Speicher 5 88 
Externes Sortieren 222 
EXIT 137 
E-13-B-Schrift 7 
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Fallabfrage 132 

False 191 

Farbe 83 281 

Farbnummer 106 

Farbtaste 232 
Fehlerbehandlung 237 254 
Fehlermeldung 237 

Feld 212£ 

Fenster (Bildschirm) 243 
Feste Satzlänge 256 
Field 36 246 

File 26 36 246 

Filter (Bit) 192 
Firmware 2 67f 115 
Fläche (Grafik) 282 

Flag 227 

Flash-Schrift 82 

Floppy 85 260 
Folgestruktur 29 117£ 
FOR 97 139 216 

Formaler Parameter 149 
Formatierte Daten 22 
Formatierung (Diskette) 91 
Formatierung (Ausgabe) 277 
Formatstring 178 

FORTH 50 

FORTRAN 50 

FRE(0) 101 195 

Frequenz 291 

Füllstring 175 

Funktion 100 149£ 
Funktion (math.) 274 
Funktionstaste 232£ 


Gap 12 14 

Gekettete Liste 210 
General-Purpose Computer 18 
Gerätenummer 180 
Geschlossene Schleife 143 
Gestreute Speicherung 37 
GET 98 146 233 

GET# 104 

Gigabyte 71 

GOSUB 98 147£ 

GOTO 98 

Grafik 267£ 

Grafik-Modus 83 183 268 
Grafik-Programmpaket 65 
Grafik-Speicherbereich 269 
Grafik-Tasten 232 

GRAPHIC 107 268 
Großcomputer 19 
Gruppenwechsel 42 230 
Gruppieren (Daten) 230 


Sachwortverzeichnis 


Hand-Held-Computer 20 
Hardware 2 4f 
Hardsektorierung 14 
Hashing 265 
Hauptspeicher 7 9 33 77 
HEADER 91 104 
Helligkeit (Farbe) 106 
HELP-Taste 235 
Hexadezimal 10 186 
Hex-Dez-Umwandlung 186£f 
Hex-Dez-Tabelle 198 
HEX$() 101 189 
Hierarchische Datenbank 44 
High Byte 194 204 261 
Hintergrund (Farbe) 281 
Hires-Grafik 268 
Hochauflösende Grafik 268 
Höherwertiges Byte 194 
Homecomputer 20 
Home-Taste 174 

Host Computer 45 53 


IC 8 67£ 

IEC-Bus 15 

IF-THEN 98 127 
IF-THEN-ELSE 98 125 
Impact-Drucker 14 

Index (Feld) 213 
Indexloch 14 

Indirekte Adressierung 265 
Indirekter Modus 87 
Individuelle Software 62 
Indizierte Speicherung 38 
Information 9 
Information Retrieval 45 
Inhouse Netz 21 

INPUT 98 118 

INPUT# 104 251 

INSTR() 101 158 160 164 
INST-DEL-Taste 80 

INT 101 138 

Integer 25 94 121 203 
Integer-Array 212 
Integrierte DV 66 

INTEL 72 

Interface 15 

Interne Datei (DATA) 151 
Interpreter 48 

ISDN-Netz 21 

Iteration 31 

I/oO 69 


Jackson-Methode 59 
Joker-Zeichen 167 
Joker * 233 

JOY() 101 
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Kanal 251 

Kassette 6 12 90 

KB 12 

Kette 39 

KEY 98 233 

Klarschrift 14 
Klarschriftbeleg 6 
Klassifizieren (Datei) 41 
Klassifizierender Begriff 266 
Kluft 12 

Kommando 96 
Kommandosteuerung 62 
Kompatibilität 19 112£ 
Komplement 196 

Konstante 34 94 

Koordinaten (Grafik) 267 287 
Korrigierte Eingabe 80 
Kosten 3 

Kreis (Grafik) 277 
Künstliche Intelligenz 4 51 


LAN 21 

Laufvariable 139 
Leerdatei/-satz 257 
Leerstring 161 

LEFT$() 101 158 163 
LEN() 101 158 

Lesen (Datei) 37 151 258 
LET 98 120 

Lied spielen 292 
Lineares Programm 29 117 
Linie 269 273 

Linked List 210 

LISP 51 

LIST 86 98 

Liste 212£ 

LOAD 104 

LOCATE 107 273 

Lochkarte 6 

Logging 16 
Logik-Baustein 68 
Logische Operationen 9 108 
Logische Ordnung 39 

LOGO 51 

Lokales Netz 21 

Low Byte 194 204 261 


Magnetband 6 12 

Magnetplatte 6 
Magnetschriftbeleg 6 

Mainframer 20 

Markierungsbeleg 6 
Maschinenorientierte Sprache 48 
Maschinensprache-Monitor 112 206 
Maske (Bit) 192 

Maske (PRINT USING) 117 
Massenspeicher 13 

Master 21 


Matrix 212£ 
Matrixdrucker 15 
Maximumsuche 223 

MB 12 

Mehrfarben-Grafik 287 
Mehrseitige Auswahl 130 
Memory-Dump 207 
Menüsteuerung 62 244 
Menütechnik 60 150 
Menware 3 

MID$() 101 158 
Mikrocomputer (Aufbau) 69£ 
Mikroprozessor 69 
Mikrotechnologie 3 

Mips 71 

Mischen (Daten) 41 229 
Mixed Hardware 16 

Mobile Datenerfassung 18 
Modul 3 

MODULA 51 
Modularisierung 59 

Modus (Betriebsart) 77 83 272 
MONITOR 98 206 

Motorola 72 

Multi-User 20 22 
Multi-Tasking 20 22 
Musik 289f 


Nanosekunde 3 

Netzwerk 21 

NEW 98 

NEXT 97 

Nicht-abweisende Schleife 135 
Niederwertiges Byte 194 

NOT 156 

Notenwert 291 

Numerischer Vergleich 130 


OASIS 52 
Objektprogramm 48 
OCR-Schrift 6 

ODER 9 156 

Öffnen (Datei) 42 251 
OEM 16 

Offene Schleife 143 
Off-line 5 

Oktave 292 

ON-GOSUB 99 148 152 
ON-GOTO 99 132 
On-line 5 

OPEN 104 179 251 
Operatoren 108 
Optische Platte 7 
OR 156 
Ordnungsbegriff 266 
Ordnungsdaten 22 
Orgware 3 

OS 24 

Overlay 61 
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PAINT 107 282£ 

PAP 57 128£ 

Paralleles Interface 15 
Parameter 147 274 

Pascal 51 

PEEK() 99 196 203£ 
Peripherie 4 69 
Personalcomputer 19f 
Physische Ordnung 39 

PILOT 51 

Pin 15 65 

Pixel-Grafik 267f 
Pixel-Bereich 268 

Plus/4 115 199 

PL/1 51 

Pointer 225 

POKE 99 199 

Portabilität 54 

Portable 20 

POS(0) 102 

POS-System 18 

PRINT 77 99 174 

PRINT# 104 179 252 

PRINT USING 99 177 
Problemanalyse 55 123 
Problemorientierte Sprache 48 
Programm 2 35 123£ 
Programmablaufplan 57 128£ 
Programmausführung (RUN) 86 118 
Programmeingabe 84f 122 
Programmentwicklung 55f£f 123 232£ 
Programmgenerator 61 
Programmgliederung 121 
Programmstrukturen 25 117£ 
Programmtest 235f£ 
Programmverkettung 232 
Programmierhilfe 238 
Programmiersprache 48 55£ 
Programmiertechnik 59 150 
Programmierung 58 
Programm-Modus 84 
Programm-Speicher 203 
Prompt-Zeichen 77 

Prozedur 33 

Prozessor 73 

Pseudocode 30 49 

P-Code 49 

PUDEF 99 


Quellcode (Source) 49 
Quellenprogramm 48 


Rahmen (Bildschirm) 281 


RAM 10 195 
Random-File 256f£f 
ECLR() 107 
EDOT() 107 285 
READ 99 
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READ (Datei) 251 
READ-DATA 1519 

Real 25 94 203 
Real-Array 212 
Rechenoperationen 78 108 
Rechenzentrum 19 
Rechnende Datenbank 45 
Rechteck (Grafik) 276 
Record 26 246 

RECORD# 257 

Redundanz 44 

Rekursion 28 

Register 70 
Register-Anzeige 210 
Relationale Datenbank 45 
Relative Datei 257 
Relativ-Positionierung 272 
REM 99 

RENAME 104 

RENUMBER 99 239 
Repeat-Until 135 
Repetition 31 
Reservierte Worte 95 
RESTORE 99 

RESUME 99 237 

RETURN 147 

RGR() 107 

RIGHT$() 102 158 
RLUM() 107 

RND() 102 138 

ROM 2 10 68 

ROM-BASIC 75 

ROM-Modul 80 

RUN 86 100 104 
RUN-STOP-Taste 90 
Runden 176 


Satz (Datei) 246 
Satzzeiger 257 

SAVE 105 

SCALE 107 

Scanner 7 18 

SCNCLR 100 

SCRATCH 105 

Screen Editing 63 
Scrolling 63 

Sektor 13 
Sekundäradresse 180 251 
Selektion 31 
Sequentielle Datei 40 244£ 
Sequentieller Speicher 37 
Serielle Speicherung 37 
Serielles Interface 15 
Serielles Suchen 220 
Set 26 

SGN() 102 193 
Simulation DOPEN# 260 
Simulation RECORD# 261 
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SIN() 102 

Small Business Computer 19 
Softsektorierung 13 
Software 2 22f£f 
Software-Bausteine 32 
Software-Engineering 59 
Software-Qualitätssicherung 63 
Sortierverfahren 222f£ 
Sortierte Verarbeitung (Datei) 39 
SOUND 108 289f 

Spalte (Array) 216 

Spalte (Grafik) 267 

SPC() 103 205 
Speicherplatz 33 77 200£ 
Speicherprogrammierung 8 
Speicher-Baustein 68 
Spielprogramm 170 

Spooling 21 

Spread Sheet 63 
Sprungadresse 127 

Spur 13 254 

SOR() 102 

SSHAPE 108 

Suchverfahren 219 

SYS 100 199 

Systemprogramm 24 
Systemvariable 100 196 
System-Konfiguration 19 


Schachtelung 32 144 

Schleife 31 133£ 

Schließen (Datei) 42 103 179 
Schnittstelle 15 65 
Schreiben (Datei) 37 179 252 
Schreibschutz 88 
Schreibtischtest 235 
Schrittplan 124 

Schrittweise Verfeinerung 61 
Schrittweite 140 


ST 102 197 

Stammdaten 22 
Standardisierung 153 
Standard-Funktion 149 
Standard-Software 62 
Stand-alone-System 16 18 22 
Statischer Datentyp 27 
Steuerprogramm 24 
Steuerzeichen 185 

Stimme (Musik) 289 

STOP 100 

Streaming 13 16 

String 94 131 
Stringverarbeitung 158f 
String-Array 26 212 
String-Speicher 201f 
Struktogramm 30 57 128£ 
Strukturierte Programmierung 61 
STR$() 102 162 
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TAB() 102 
Tabellenkalkulation 63 
Tabellenverarbeitung 212£ 
Takt (Prozessor) 71 
Takt (musik) 291 

TAN() 102 

Tape 90 

Teachware 3 

Test 235f£ 

Textdaten 23 81 
Textverarbeitung 158£ 
Textverarbeitung (Paket) 64 
Textvergleich 130 
Text-Bereich 268 
Text-Grafik 267 
Text-Modus 83 183 

THEN 125 

Thermodrucker 15 

TI 102 

TI$ 102 
Tintenstrahldrucker 15 
Token 204 

Tongenerator 289 
Top-Down-Entwurf 60 
Tortendiagramm 280 285 
Trace-Lauf 235 

TRAP 100 237 

TRON, TROFF 235 

True 191 
Turn-Key-System 63 
Typenraddrucker 15 


UCSD-Betriebssystem 49 53 
Überläufer 266 
Übersetzerprogramm 24 
Unbedingte Verzweigung 127 
UND (logisch) 9 156 
Unechte Zählerschleife 
UNIX 53 
Unterbereichstyp 28 
Unterprogramm 31 147f£ 
Unterprogrammtechnik 60 
Urbeleg 17 

USING 177 

USR() 102 200 

Utility 24 


141 


 VAL() 102 158 


Variable 34 94 202 

Variablenliste 123 211 

Vektor 212£ 

Verbund 26 

Verdichten (Daten) 230 

Verdichten (Datei) 41 

Vereinbarung 34 95 
Vereinbarungsteil (Programm) 35 121 
Vergleichszeichen 108 155 
Verkettete Liste 210 
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Verkettete Programme 241 
Verkettete Speicherung 39 
Verkettungsoperator + 158 
Verschlüsselung 169 
Verzweigung 125f£f 157 
Verzweigungstechnik 155£ 
Videocomputer 20 

VOL 108 

Vordergrund (Farbe) 281 
Vorzeichenstelle 174 
V.24-Schnittstelle 15 


Wahrheitswert 156 
WAIT 100 
Warteschleife 146 
Wechselplatte 6 
Wertzuweisung 120 
WHILE 133£ 
Wiederholungsstruktur 31 133f£ 
Winchesterplatte 6 
Window 243 
Wortbreite 70 
WRITE (Datei) 252 
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XENIX 52 


zählerschleife 139f£ 
Zeichen 9 267 
zeichenkettendaten 22 
zeichen „ ; 174 255 
zeiger 38 201 257 
Zeigersortieren 225 
zeile 216 267 

zilog 72 

Zufallszahl 138 
Zugriffsart (Datei) 37 
Zugriffseinheit 13 

Zuse 3 

Zuweisungszeichen = 119£f 
Zweiseitige Auswahl 125 
Zwei-Byte-Adresse 194 201 210 
2-80 Prozessor 72 
Zylinder 14 


Programmverzeichnis 


Alle in diesem Buch dargestellten Programme sind auf einer 5.25”-Diskette gespeichert, die 
unter DOS 2.x auf Disketten-Laufwerken wie VC 1541 und CBM 4040 ausgeführt werden 
können. Diese Diskette kann vom Verlag über die dem Buch beiliegende Anforderungs- 
karte bestellt werden. Das folgende Inhaltsverzeichnis zeigt die Namen und Blöcke der 
87 BASIC-Programme mit einem Umfang von 294 Blöcken bzw. 75264 Bytes Ica. 
75 KBytes). 


a WE TalIE SE 1 0 = "FUELLSTRINGI" FR 
& "MELLE" FRG ! "RUHNDENZAHLI" FRI 
1 "WERBRALUCHI" FRG 3 "KOMMERZZÄHLL " PRO 
| "FREISSEHNEUNGL" FR E "DEMO-USINGL!" PR 
2 "PREISSENKLNGE" FR 5 "DREUCKERL" FRG 
5 "KALKULATION" FRI 1 "CHRE-TESTL" PRG 
2 "SKONTOZWEISEITI" FRG f.. . *RSEHLSTESTL" FRG 
& "SKÖHNTOZUEISEITZ" PRo & "DEZIMALEBINAERI" FRI 
& "SEÖONTOEINSEITI" FR Fr "EINAERDEZIMALI" FRI: 
& "SKOMTOEINSEITE" Fü 5 "HE#DEZIMALI" FR 
& "DREIFHELLEI” FRI: 4 "DEEIMALHEAL" FRG 
= "DREIFRELLEZ FR & "DEZIMALEIHRERE" FR 
te "MWSTL" FR & "DEZIMALEINAERS" FRI: 
Ko) KAPITAL" PR 3 "DEZIMALEIHRERSF" FRI; 
2 "EHFITALIL" FR E "FEERLESENT" PRI5 
“ "EHFITALEE" FR 3 "FÜKESCHREIBEHNI" PRG 
ec) "KAFITAL2L" FRG 3 "LAGERREGAL1 " FRI: 
4 "ZUFRALLI" FR 3 "YOKRBELDRILL1" FRI; 
1 "EBENEHMARK-TESTI" FROG ra) "ABSATZTABELLEI” FRG 
= "FAHRTENEUGHI" FRI 4 "SUCHEINRERI FR 
ha) "EHTEHSFARTAEBEELLE" FRG 3 "SORTODATEMI" FRI 
& "DEMO-UPEOL" FR Re) "SUÜRTEEIGERL” FR; 
2 "DEMÖ-FUHETIOHL" FR 4 "SORTDHTEHE" FRI 
m "MEHUEL" FRG J "MISCHDATEHL" FRI 
4 "STANDARD" FR 2 "GRUPFDATEHL" FR 
1 "EOOLERHI" FRG & "FEHLER-TERPI" FR 
1 "BONLERNE" FRG Zu "SERUENT-DATEIL" FR 
& "BOOLERHS" Frl i "THSTEHBELERUNGI" FRG 
“ "ZEICHSTEINGSUCHL" FR 12 VDIBERT-DATELL" FRG 
<} "ZEICHSUCHI” FRI & "ZEIT-TESTL" FRG 
ei "STRINGSUCHL" FRG = "MÖDULHLT" PR 
3 "TERTUMKEHNFEHL" FR; 1 "MODULHEN" FR 
1 "AUSEINAHDERL" FRI; 2 "WMINDOW-TESTL" FRG 
Re) "BLANKSZEIBEMT” FRI Re; "LOLUR-TESTL" FRG 
& "RECHTSEUENDIGI" FR; = "DRAU-TESTL" FRG 
fi "FUEHREHDEHULLI" FR IC "LINIE-BEWERL" FR 
1 "STEIHGELAHESI" FR 4 "KURYEL" FR 
1 "DATUMGANZEHHLI" FRI: = "BUA-TESTL" FR 
a "ETIKETTENI”" PR E IBIRLLE=-TESTI FREI 
5 "JORERi" FR 5 "PHINI-TESTL" Fri 
a "WERSCHLLUESSELLHG" FR hs) "TORTEHDIAGERAMMI" FROG 
S "WÖRTSPIELI" FR 5 "TESTFAREZUFALLI" PRG 
& "URSÖRFOSITIOHL" FRG ie) "MUSIESTÜECEKL" FR5 
& "DEMHÖ-PREIHTL" Frl £ "SIHD-TESTL" FR; 

fi "MUSIKSTUECKE " Fri 


